comparison src/pt-cmd.cc @ 1234:9204518e940f

[project @ 1995-04-10 14:31:21 by jwe]
author jwe
date Mon, 10 Apr 1995 14:31:21 +0000
parents 38b876e46ff6
children e1ddfb12566d
comparison
equal deleted inserted replaced
1233:be470fb54633 1234:9204518e940f
388 tree_indirect_ref *idr = tmp_id->ident (); 388 tree_indirect_ref *idr = tmp_id->ident ();
389 if (idr->is_identifier_only ()) 389 if (idr->is_identifier_only ())
390 ident = idr->ident (); 390 ident = idr->ident ();
391 } 391 }
392 392
393 if (id_list && ! ident && ! tmp_expr->is_map ()) 393 if (id_list && ! ident && ! tmp_expr.is_map ())
394 { 394 {
395 error ("in statement `for [X, Y] = VAL', VAL must be a structure"); 395 error ("in statement `for [X, Y] = VAL', VAL must be a structure");
396 return; 396 return;
397 } 397 }
398 398