Mercurial > hg > octave-avbm

comparison src/variables.cc @ 2950:5252c7275b8c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1997-05-09 14:23:43 by jwe]
author jwe
date Fri, 09 May 1997 14:23:43 +0000
parents 49b42be38aa1
children ca7d3625ee01
comparison
equal deleted inserted replaced
2949:49b42be38aa1 2950:5252c7275b8c
111 111
112 void 112 void
113 octave_variable_reference::assign (octave_value::assign_op op, 113 octave_variable_reference::assign (octave_value::assign_op op,
114 const octave_value& rhs) 114 const octave_value& rhs)
115 { 115 {
116 // octave_value saved_val; 116 octave_value saved_val;
117 117
118 // if (chg_fcn) 118 if (chg_fcn)
119 // octave_value saved_val = *val; 119 octave_value saved_val = *val;
120 120
121 if (struct_elt_name.empty ()) 121 if (struct_elt_name.empty ())
122 val->assign (op, rhs); 122 val->assign (op, rhs);
123 else 123 else
124 val->assign_struct_elt (op, struct_elt_name, rhs); 124 val->assign_struct_elt (op, struct_elt_name, rhs);
125 125
126 // if (chg_fcn && chg_fcn () < 0) 126 if (chg_fcn && chg_fcn () < 0)
127 // *val = saved_val; 127 *val = saved_val;
128 } 128 }
129 129
130 void 130 void
131 octave_variable_reference::assign (octave_value::assign_op op, 131 octave_variable_reference::assign (octave_value::assign_op op,
132 const octave_value_list& idx, 132 const octave_value_list& idx,