X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/a9f5ab8de62884067808d6b114a8c2df780fb054..a705fd33893d18a8306026f955019f8440681b9a:/perly.y

diff --git a/perly.y b/perly.y
index 3440dcb..7d57dea 100644
--- a/perly.y
+++ b/perly.y
@@ -143,7 +143,7 @@ grammar	:	GRAMPROG
 			  PL_eval_root = $3;
 			  $$ = 0;
 			  yyunlex();
-			  parser->yychar = YYEOF;
+			  parser->yychar = yytoken = YYEOF;
 			}
 	|	GRAMBARESTMT
 			{
@@ -155,7 +155,7 @@ grammar	:	GRAMPROG
 			  PL_eval_root = $3;
 			  $$ = 0;
 			  yyunlex();
-			  parser->yychar = YYEOF;
+			  parser->yychar = yytoken = YYEOF;
 			}
 	|	GRAMFULLSTMT
 			{
@@ -167,7 +167,7 @@ grammar	:	GRAMPROG
 			  PL_eval_root = $3;
 			  $$ = 0;
 			  yyunlex();
-			  parser->yychar = YYEOF;
+			  parser->yychar = yytoken = YYEOF;
 			}
 	|	GRAMSTMTSEQ
 			{