Mercurial > hg > octave-lyh

diff src/oct-lvalue.cc @ 3357:34d512262892

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1999-11-18 07:18:30 by jwe]
author jwe
date Thu, 18 Nov 1999 07:18:31 +0000 (1999-11-18)
parents 549691faa638
children cc8ae49d6e79
line wrap: on
line diff
--- a/src/oct-lvalue.cc
+++ b/src/oct-lvalue.cc
@@ -57,6 +57,18 @@
 }
 
 void
+octave_lvalue::set_index (const octave_value_list& i)
+{
+  if (! index_set)
+    {
+      idx = i;
+      index_set = true;
+    }
+  else
+    error ("invalid index expression in assignment");
+}
+
+void
 octave_lvalue::do_unary_op (octave_value::unary_op op)
 {
   octave_value saved_val;