Mercurial > hg > octave-lyh

diff src/pt-misc.cc @ 745:586160369413

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-09-30 15:00:00 by jwe]
author jwe
date Fri, 30 Sep 1994 15:04:51 +0000
parents 1c072f20b522
children 05cd8c8b13b3
line wrap: on
line diff
--- a/src/pt-misc.cc
+++ b/src/pt-misc.cc
@@ -410,12 +410,15 @@
     }
   else if (assign_expr)
     {
-      tree_identifier *id = assign_expr->left_hand_side ();
-
-      if (id)
-	id->link_to_global ();
-
-      assign_expr->eval (0);
+      tree_identifier *id = 0;
+      if (assign_expr->left_hand_side_is_identifier_only ()
+	  && (id = assign_expr->left_hand_side_id ()))
+	{
+	  id->link_to_global ();
+	  assign_expr->eval (0);
+	}
+      else
+	error ("global: unable to make individual structure elements global");
     }
 }