Mercurial > hg > octave-nkf
diff src/ov-typeinfo.h @ 3196:3ac3e8edc258
[project @ 1998-10-28 23:04:39 by jwe]
author | jwe |
---|---|
date | Wed, 28 Oct 1998 23:11:11 +0000 |
parents | 66ef74ee5d9f |
children | bc61b0e8d60e |
line wrap: on
line diff
--- a/src/ov-typeinfo.h +++ b/src/ov-typeinfo.h @@ -52,6 +52,9 @@ static bool register_assign_op (octave_value::assign_op, int, int, assign_op_fcn); + static bool register_assignany_op (octave_value::assign_op, int, + assign_op_fcn); + static bool register_pref_assign_conv (int, int, int); static bool register_widening_op (int, int, type_conv_fcn); @@ -68,6 +71,12 @@ return instance->do_lookup_assign_op (op, t_lhs, t_rhs); } + static assign_op_fcn + lookup_assignany_op (octave_value::assign_op op, int t_lhs) + { + return instance->do_lookup_assignany_op (op, t_lhs); + } + static int lookup_pref_assign_conv (int t_lhs, int t_rhs) { @@ -93,6 +102,8 @@ init_tab_sz, (binary_op_fcn) 0), assign_ops (octave_value::num_assign_ops, init_tab_sz, init_tab_sz, (assign_op_fcn) 0), + assignany_ops (octave_value::num_assign_ops, init_tab_sz, + (assign_op_fcn) 0), pref_assign_conv (init_tab_sz, init_tab_sz, -1), widening_ops (init_tab_sz, init_tab_sz, (type_conv_fcn) 0) { } @@ -110,6 +121,8 @@ Array3<assign_op_fcn> assign_ops; + Array2<assign_op_fcn> assignany_ops; + Array2<int> pref_assign_conv; Array2<type_conv_fcn> widening_ops; @@ -122,6 +135,9 @@ bool do_register_assign_op (octave_value::assign_op, int, int, assign_op_fcn); + bool do_register_assignany_op (octave_value::assign_op, int, + assign_op_fcn); + bool do_register_pref_assign_conv (int, int, int); bool do_register_widening_op (int, int, type_conv_fcn); @@ -132,6 +148,9 @@ assign_op_fcn do_lookup_assign_op (octave_value::assign_op, int, int); + assign_op_fcn + do_lookup_assignany_op (octave_value::assign_op, int); + int do_lookup_pref_assign_conv (int, int); type_conv_fcn do_lookup_widening_op (int, int);