One more run_byacc (a hand-tweaked version had slipped in).

p4raw-id: //depot/perl@10510

diff --git a/perly.c b/perly.c
index 2b2a3f0..61a6fd3 100644 (file)
--- a/perly.c
+++ b/perly.c
@@ -1509,9 +1509,7 @@ yyloop:
         if (yyerrflag > 0)  --yyerrflag;
         goto yyloop;
     }
-    if (
-((yyn = yyrindex[yystate])) && 
-(yyn += yychar) >= 0 &&
+    if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
             yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
     {
         yyn = yytable[yyn];
@@ -1519,12 +1517,12 @@ yyloop:
     }
     if (yyerrflag) goto yyinrecovery;
 #ifdef lint
-    goto yynewerror;
+
 #endif
 
     yyerror("syntax error");
 #ifdef lint
-    goto yyerrlab;
+
 #endif
 
     ++yynerrs;

diff --git a/vms/perly_c.vms b/vms/perly_c.vms
index 9528fa1..3c6b437 100644 (file)
--- a/vms/perly_c.vms
+++ b/vms/perly_c.vms
@@ -1519,12 +1519,12 @@ yyloop:
     }
     if (yyerrflag) goto yyinrecovery;
 #ifdef lint
-    goto yynewerror;
+
 #endif
 
     yyerror("syntax error");
 #ifdef lint
-    goto yyerrlab;
+
 #endif
 
     ++yynerrs;