diff src/variables.cc @ 2953:ca7d3625ee01

[project @ 1997-05-09 14:56:52 by jwe]
author jwe
date Fri, 09 May 1997 14:57:34 +0000
parents 5252c7275b8c
children ac3368dba5d3
line wrap: on
line diff
--- a/src/variables.cc
+++ b/src/variables.cc
@@ -109,43 +109,6 @@
 // Symbol table for global symbols.
 symbol_table *global_sym_tab = 0;
 
-void
-octave_variable_reference::assign (octave_value::assign_op op,
-				   const octave_value& rhs)
-{
-  octave_value saved_val;
-
-  if (chg_fcn)
-    octave_value saved_val = *val;
-
-  if (struct_elt_name.empty ())
-    val->assign (op, rhs);
-  else
-    val->assign_struct_elt (op, struct_elt_name, rhs);
-
-  if (chg_fcn && chg_fcn () < 0)
-    *val = saved_val;
-}
-
-void
-octave_variable_reference::assign (octave_value::assign_op op,
-				   const octave_value_list& idx,
-				   const octave_value& rhs)
-{
-  octave_value saved_val;
-
-  if (chg_fcn)
-    octave_value saved_val = *val;
-
-  if (struct_elt_name.empty ())
-    val->assign (op, idx, rhs);
-  else
-    val->assign_struct_elt (op, struct_elt_name, idx, rhs);
-
-  if (chg_fcn && chg_fcn () < 0)
-    *val = saved_val;
-}
-
 // Initialization.
 
 // Create the initial symbol tables and set the current scope at the
@@ -1577,7 +1540,7 @@
 					  v.eternal, v.help_string);
   else
     bind_builtin_variable (v.name, v.value, v.protect, v.eternal,
-			   v.sv_function, v.help_string);
+			   v.sv_fcn, v.help_string);
 }
 
 void
@@ -1665,7 +1628,8 @@
 
 void
 bind_builtin_variable (const string& varname, const octave_value& val,
-		       bool protect, bool eternal, sv_Function sv_fcn,
+		       bool protect, bool eternal,
+		       symbol_record::sv_function sv_fcn,
 		       const string& help)
 {
   symbol_record *sr = global_sym_tab->lookup (varname, true);