comparison src/ov-base.h @ 2477:3d905d3820a4

[project @ 1996-11-07 16:46:11 by jwe]
author jwe
date Thu, 07 Nov 1996 16:48:16 +0000
parents 1573640a9994
children 8ed4362aa0d6
comparison
equal deleted inserted replaced
2476:4de4cebed088 2477:3d905d3820a4
43 class Octave_map; 43 class Octave_map;
44 class octave_value_list; 44 class octave_value_list;
45 45
46 class tree_walker; 46 class tree_walker;
47 47
48 // Real scalar values. 48 // A base value type, so that derived types only have to redefine what
49 // they need (if they are derived from octave_base_value instead of
50 // octave_value).
49 51
50 class 52 class
51 octave_base_value : public octave_value 53 octave_base_value : public octave_value
52 { 54 {
53 public: 55 public:
59 : octave_value (octave_xvalue ()) { } 61 : octave_value (octave_xvalue ()) { }
60 62
61 ~octave_base_value (void) { } 63 ~octave_base_value (void) { }
62 64
63 octave_value *clone (void) { return new octave_base_value (*this); } 65 octave_value *clone (void) { return new octave_base_value (*this); }
64
65 #if 0
66 void *operator new (size_t size);
67 void operator delete (void *p, size_t size);
68 #endif
69 66
70 type_conv_fcn numeric_conversion_function (void) const 67 type_conv_fcn numeric_conversion_function (void) const
71 { return (type_conv_fcn) 0; } 68 { return (type_conv_fcn) 0; }
72 69
73 octave_value *try_narrowing_conversion (void) 70 octave_value *try_narrowing_conversion (void)
180 static void register_type (void) 177 static void register_type (void)
181 { t_id = octave_value_typeinfo::register_type (t_name); } 178 { t_id = octave_value_typeinfo::register_type (t_name); }
182 179
183 private: 180 private:
184 181
182 // Type id of base value objects, set by register_type().
185 static int t_id; 183 static int t_id;
186 184
185 // Type name of base value objects, defined in ov-base.cc.
187 static const string t_name; 186 static const string t_name;
188 }; 187 };
189 188
190 #endif 189 #endif
191 190