Mercurial > hg > octave-lyh
diff src/ov-builtin.h @ 3219:30770ba4457a
[project @ 1998-11-13 03:44:31 by jwe]
author | jwe |
---|---|
date | Fri, 13 Nov 1998 03:44:36 +0000 |
parents | ebbc34ff7f66 |
children | 2efa28a91e7a |
line wrap: on
line diff
--- a/src/ov-builtin.h +++ b/src/ov-builtin.h @@ -50,25 +50,10 @@ ~octave_builtin (void) { } - void *operator new (size_t size) - { return allocator.alloc (size); } - - void operator delete (void *p, size_t size) - { allocator.free (p, size); } - octave_function *function_value (bool) { return this; } octave_value_list do_index_op (int nargout, const octave_value_list& args); - int type_id (void) const { return t_id; } - - string type_name (void) const { return t_name; } - - static int static_type_id (void) { return t_id; } - - static void register_type (void) - { t_id = octave_value_typeinfo::register_type (t_name); } - private: octave_builtin (void); @@ -78,14 +63,9 @@ // A pointer to the actual function. fcn f; - // For custom memory management. - static octave_allocator allocator; + DECLARE_OV_TYPEID_FUNCTIONS_AND_DATA - // Type id of list objects, set by register_type(). - static int t_id; - - // Type name of list objects, defined in ov-list.cc. - static const string t_name; + DECLARE_OCTAVE_ALLOCATOR }; #endif