Mercurial > hg > octave-jordi
diff src/defun-int.h @ 5794:1138ced03f14
[project @ 2006-05-08 20:23:04 by jwe]
author | jwe |
---|---|
date | Mon, 08 May 2006 20:23:07 +0000 (2006-05-08) |
parents | cbf717bf8150 |
children | 20f4bd627a74 |
line wrap: on
line diff
--- a/src/defun-int.h +++ b/src/defun-int.h @@ -48,12 +48,6 @@ bool can_hide_function = true); extern void -install_builtin_variable (const std::string& n, const octave_value& v, - bool p, bool e, - symbol_record::change_function chg_fcn, - const std::string& h); - -extern void install_dld_function (octave_dld_function::fcn f, const std::string& name, const octave_shlib& shl, const std::string& doc, bool is_text_fcn = false); @@ -90,28 +84,6 @@ return error_state ? false : true; \ } -// Define a builtin variable. -// -// name is the name of the variable, unquoted. -// -// defn is the initial value for the variable. -// -// protect is a flag that says whether it should be possible to give -// the variable a new value. -// -// eternal is a flag that says whether it should be possible to -// clear the variable. Most builtin variables are eternal, and -// cannot be cleared. -// -// chg_fcn is a pointer to a function that should be called whenever -// this variable is given a new value. It can be 0 if there is no -// function to call. See also the code in user-prefs.cc. -// -// doc is the simple help text for this variable. - -#define DEFVAR(name, defn, chg_fcn, doc) \ - DEFVAR_INTERNAL (#name, SBV_ ## name, defn, false, chg_fcn, doc) - // MAKE_BUILTINS is defined to extract function names and related // information and create the *.df files that are eventually used to // create the builtins.cc file. @@ -154,11 +126,6 @@ XDEFALIAS_INTERNAL(alias, name) \ END_INSTALL_BUILTIN -#define DEFVAR_INTERNAL(name, sname, defn, protect, chg_fcn, doc) \ - BEGIN_INSTALL_BUILTIN \ - XDEFVAR_INTERNAL(name, sname, defn, protect, chg_fcn, doc) \ - END_INSTALL_BUILTIN - #define DEFUN_MAPPER_INTERNAL(name, ch_map, d_b_map, c_b_map, d_d_map, \ d_c_map, c_c_map, lo, hi, \ ch_map_flag, can_ret_cmplx_for_real, doc) \ @@ -187,17 +154,6 @@ #define DEFALIAS_INTERNAL(alias, name) -// How builtin variables are actually installed. - -#define DEFVAR_INTERNAL(name, sname, defn, protect, chg_fcn, doc) \ - install_builtin_variable (name, octave_value (defn), protect, \ - (chg_fcn != 0), chg_fcn, doc) - -// How builtin variables are actually installed. - -#define INSTALL_CONST(name, sname, defn, protect, doc) \ - install_builtin_constant (name, octave_value (defn), protect, doc) - // How mapper functions are actually installed. // FIXME -- Really want to avoid the following casts, since