Mercurial > octave-nkf
diff src/defun.cc @ 3145:0d640dc625c7
[project @ 1998-02-05 08:44:59 by jwe]
author | jwe |
---|---|
date | Thu, 05 Feb 1998 08:45:07 +0000 |
parents | 2e114e914b77 |
children | 4964d5391acc |
line wrap: on
line diff
--- a/src/defun.cc Wed Feb 04 22:53:59 1998 +0000 +++ b/src/defun.cc Thu Feb 05 08:45:07 1998 +0000 @@ -69,10 +69,8 @@ // Install variables and functions in the symbol tables. void -install_builtin_mapper (void *mf_arg) +install_builtin_mapper (octave_mapper *mf) { - octave_mapper *mf = static_cast<octave_mapper *> (mf_arg); - symbol_record *sym_rec = global_sym_tab->lookup (mf->name (), true); unsigned int t @@ -86,11 +84,9 @@ } void -install_builtin_function (void *f_arg, const string& name, +install_builtin_function (octave_builtin::fcn f, const string& name, const string& doc, bool is_text_fcn) { - octave_builtin::fcn f = static_cast<octave_builtin::fcn> (f_arg); - symbol_record *sym_rec = global_sym_tab->lookup (name, true); unsigned int t = symbol_record::BUILTIN_FUNCTION; @@ -129,13 +125,11 @@ void install_builtin_variable (const string& name, const octave_value& value, - bool install_as_function, bool protect, - bool eternal, void *chg_fcn_arg, + bool install_as_function, + bool protect, bool eternal, + symbol_record::change_function chg_fcn, const string& help_string) { - symbol_record::change_function chg_fcn - = static_cast<symbol_record::change_function> (chg_fcn_arg); - if (install_as_function) install_builtin_variable_as_function (name, value, protect, eternal, help_string);