Skip to content
Snippets Groups Projects
Commit 902c2912 authored by Fredrik Hübinette (Hubbe)'s avatar Fredrik Hübinette (Hubbe)
Browse files

removed a pike-freezing bug

Rev: src/language.yacc:1.99
parent 60927eed
No related branches found
No related tags found
No related merge requests found
...@@ -179,7 +179,7 @@ ...@@ -179,7 +179,7 @@
/* This is the grammar definition of Pike. */ /* This is the grammar definition of Pike. */
#include "global.h" #include "global.h"
RCSID("$Id: language.yacc,v 1.98 1998/06/06 13:50:44 grubba Exp $"); RCSID("$Id: language.yacc,v 1.99 1998/07/31 21:51:31 hubbe Exp $");
#ifdef HAVE_MEMORY_H #ifdef HAVE_MEMORY_H
#include <memory.h> #include <memory.h>
#endif #endif
...@@ -1260,6 +1260,7 @@ safe_lvalue: lvalue ...@@ -1260,6 +1260,7 @@ safe_lvalue: lvalue
; ;
safe_expr0: expr0 safe_expr0: expr0
| F_LEX_EOF { yyerror("Unexpected end of file."); $$=mkintnode(0); }
| error { $$=mkintnode(0); } | error { $$=mkintnode(0); }
; ;
...@@ -1267,7 +1268,7 @@ foreach: F_FOREACH ...@@ -1267,7 +1268,7 @@ foreach: F_FOREACH
{ {
$<number>$=compiler_frame->current_number_of_locals; $<number>$=compiler_frame->current_number_of_locals;
} }
'(' safe_expr0 ',' safe_lvalue end_cond statement '(' expr0 ',' safe_lvalue end_cond statement
{ {
if ($6) { if ($6) {
$$=mknode(F_FOREACH, mknode(F_VAL_LVAL,$4,$6),$8); $$=mknode(F_FOREACH, mknode(F_VAL_LVAL,$4,$6),$8);
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment