# HG changeset patch
# User jwe
# Date 1040785611 0
# Node ID a01ea6c855a3d6eed14392984b11ddde9eaa91d7
# Parent  23bb43fc1184fda1de5338b8e3d7028765fc7dcd
[project @ 2002-12-25 03:06:51 by jwe]

diff -r 23bb43fc1184 -r a01ea6c855a3 src/ChangeLog
--- a/src/ChangeLog	Wed Dec 25 02:59:54 2002 +0000
+++ b/src/ChangeLog	Wed Dec 25 03:06:51 2002 +0000
@@ -1,5 +1,8 @@
 2002-12-24  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
+	* parse.y (postfix_expr): Reset	lexer_flags.looking_at_object_index
+	in () and {} cases too.
+
 	* ov-usr-fcn.cc (clear_symbol_table): Clear variables only.
 
 2002-12-21  John W. Eaton  <jwe@bevo.che.wisc.edu>
diff -r 23bb43fc1184 -r a01ea6c855a3 src/parse.y
--- a/src/parse.y	Wed Dec 25 02:59:54 2002 +0000
+++ b/src/parse.y	Wed Dec 25 03:06:51 2002 +0000
@@ -712,14 +712,20 @@
 postfix_expr	: primary_expr
 		  { $$ = $1; }
 		| postfix_expr '(' begin_obj_idx ')'
-		  { $$ = make_index_expression ($1, 0, '('); }
+		  {
+		    $$ = make_index_expression ($1, 0, '(');
+		    lexer_flags.looking_at_object_index = false;
+		  }
 		| postfix_expr '(' begin_obj_idx arg_list ')'
 		  {
 		    $$ = make_index_expression ($1, $4, '(');
 		    lexer_flags.looking_at_object_index = false;
 		  }
 		| postfix_expr '{' begin_obj_idx '}'
-		  { $$ = make_index_expression ($1, 0, '{'); }
+		  {
+		    $$ = make_index_expression ($1, 0, '{');
+		    lexer_flags.looking_at_object_index = false;
+		  }
 		| postfix_expr '{' begin_obj_idx arg_list '}'
 		  {
 		    $$ = make_index_expression ($1, $4, '{');