comparison src/ov-typeinfo.h @ 7800:5861b95e9879

support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 07 May 2008 16:33:15 +0200
parents 745a8299c2b5
children eb63fbe60fab
comparison
equal deleted inserted replaced
7799:199181592240 7800:5861b95e9879
78 binary_class_op_fcn); 78 binary_class_op_fcn);
79 79
80 static bool register_binary_op (octave_value::binary_op, int, int, 80 static bool register_binary_op (octave_value::binary_op, int, int,
81 binary_op_fcn); 81 binary_op_fcn);
82 82
83 static bool register_binary_class_op (octave_value::compound_binary_op,
84 binary_class_op_fcn);
85
86 static bool register_binary_op (octave_value::compound_binary_op, int, int,
87 binary_op_fcn);
88
83 static bool register_cat_op (int, int, cat_op_fcn); 89 static bool register_cat_op (int, int, cat_op_fcn);
84 90
85 static bool register_assign_op (octave_value::assign_op, int, int, 91 static bool register_assign_op (octave_value::assign_op, int, int,
86 assign_op_fcn); 92 assign_op_fcn);
87 93
126 return instance->do_lookup_binary_class_op (op); 132 return instance->do_lookup_binary_class_op (op);
127 } 133 }
128 134
129 static binary_op_fcn 135 static binary_op_fcn
130 lookup_binary_op (octave_value::binary_op op, int t1, int t2) 136 lookup_binary_op (octave_value::binary_op op, int t1, int t2)
137 {
138 return instance->do_lookup_binary_op (op, t1, t2);
139 }
140
141 static binary_class_op_fcn
142 lookup_binary_class_op (octave_value::compound_binary_op op)
143 {
144 return instance->do_lookup_binary_class_op (op);
145 }
146
147 static binary_op_fcn
148 lookup_binary_op (octave_value::compound_binary_op op, int t1, int t2)
131 { 149 {
132 return instance->do_lookup_binary_op (op, t1, t2); 150 return instance->do_lookup_binary_op (op, t1, t2);
133 } 151 }
134 152
135 static cat_op_fcn 153 static cat_op_fcn
210 228
211 Array<binary_class_op_fcn> binary_class_ops; 229 Array<binary_class_op_fcn> binary_class_ops;
212 230
213 Array3<binary_op_fcn> binary_ops; 231 Array3<binary_op_fcn> binary_ops;
214 232
233 Array<binary_class_op_fcn> compound_binary_class_ops;
234
235 Array3<binary_op_fcn> compound_binary_ops;
236
215 Array2<cat_op_fcn> cat_ops; 237 Array2<cat_op_fcn> cat_ops;
216 238
217 Array3<assign_op_fcn> assign_ops; 239 Array3<assign_op_fcn> assign_ops;
218 240
219 Array2<assignany_op_fcn> assignany_ops; 241 Array2<assignany_op_fcn> assignany_ops;
238 binary_class_op_fcn); 260 binary_class_op_fcn);
239 261
240 bool do_register_binary_op (octave_value::binary_op, int, int, 262 bool do_register_binary_op (octave_value::binary_op, int, int,
241 binary_op_fcn); 263 binary_op_fcn);
242 264
265 bool do_register_binary_class_op (octave_value::compound_binary_op,
266 binary_class_op_fcn);
267
268 bool do_register_binary_op (octave_value::compound_binary_op, int, int,
269 binary_op_fcn);
270
243 bool do_register_cat_op (int, int, cat_op_fcn); 271 bool do_register_cat_op (int, int, cat_op_fcn);
244 272
245 bool do_register_assign_op (octave_value::assign_op, int, int, 273 bool do_register_assign_op (octave_value::assign_op, int, int,
246 assign_op_fcn); 274 assign_op_fcn);
247 275
264 (octave_value::unary_op, int); 292 (octave_value::unary_op, int);
265 293
266 binary_class_op_fcn do_lookup_binary_class_op (octave_value::binary_op); 294 binary_class_op_fcn do_lookup_binary_class_op (octave_value::binary_op);
267 295
268 binary_op_fcn do_lookup_binary_op (octave_value::binary_op, int, int); 296 binary_op_fcn do_lookup_binary_op (octave_value::binary_op, int, int);
297
298 binary_class_op_fcn do_lookup_binary_class_op (octave_value::compound_binary_op);
299
300 binary_op_fcn do_lookup_binary_op (octave_value::compound_binary_op, int, int);
269 301
270 cat_op_fcn do_lookup_cat_op (int, int); 302 cat_op_fcn do_lookup_cat_op (int, int);
271 303
272 assign_op_fcn do_lookup_assign_op (octave_value::assign_op, int, int); 304 assign_op_fcn do_lookup_assign_op (octave_value::assign_op, int, int);
273 305