Mercurial > octave

diff src/parse.y @ 5841:fb4dea2184bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-06-05 20:59:25 by jwe]
author jwe
date Mon, 05 Jun 2006 20:59:25 +0000
parents 5e41e06f6a78
children 415ae81d331b
line wrap: on
line diff
--- a/src/parse.y	Thu Jun 01 22:08:00 2006 +0000
+++ b/src/parse.y	Mon Jun 05 20:59:25 2006 +0000
@@ -832,7 +832,10 @@
 // one token for an assignment op.
 
 assign_lhs	: simple_expr
-		  { $$ = new tree_argument_list ($1); }
+		  {
+		    $$ = new tree_argument_list ($1);
+		    $$->mark_as_simple_assign_lhs ();
+		  }
 		| '[' arg_list CLOSE_BRACE
 		  {
 		    $$ = $2;
@@ -2424,7 +2427,7 @@
   int l = eq_tok->line ();
   int c = eq_tok->column ();
 
-  if (lhs->length () == 1)
+  if (lhs->is_simple_assign_lhs ())
     {
       tree_expression *tmp = lhs->remove_front ();