Mercurial > hg > octave-lyh
diff src/variables.cc @ 2878:55cca18e943a
[project @ 1997-04-24 09:19:43 by jwe]
author | jwe |
---|---|
date | Thu, 24 Apr 1997 09:25:02 +0000 |
parents | 00c0cd0f2ee7 |
children | aef2d43edbc2 |
line wrap: on
line diff
--- a/src/variables.cc +++ b/src/variables.cc @@ -126,29 +126,31 @@ } void -octave_variable_reference::assign (const octave_value& rhs) +octave_variable_reference::assign (octave_value::assign_op op, + const octave_value& rhs) { if (id) - id->assign (rhs); + id->assign (op, rhs); else if (indir) { octave_value& ult = indir->reference (); - ult = rhs; + ult.assign (op, rhs); } else panic_impossible (); } void -octave_variable_reference::assign (const octave_value_list& idx, +octave_variable_reference::assign (octave_value::assign_op op, + const octave_value_list& idx, const octave_value& rhs) { if (id) - id->assign (idx, rhs); + id->assign (op, idx, rhs); else if (indir) { octave_value& ult = indir->reference (); - ult.assign (idx, rhs); + ult.assign (op, idx, rhs); } else panic_impossible ();