summaryrefslogtreecommitdiff
path: root/perly.c
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>2001-06-14 08:25:07 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>2001-06-14 08:25:07 +0000
commitf4db54055cd36d83622f77949fd6ab7c67198101 (patch)
treefdaa9a05f9cc98d05bb9049d7772de6ea8216b68 /perly.c
parent2d31dd6aa775ba3ae596182dab64c54df2e34ba1 (diff)
downloadperl-f4db54055cd36d83622f77949fd6ab7c67198101.tar.gz
Add new step to run_byacc which:
A. Corrects #line NNN "perly.c" lines so warnings etc. are trackable B. Adds extra () to the two if (var = ...) constructs gcc -Wall winges about. p4raw-id: //depot/perlio@10586
Diffstat (limited to 'perly.c')
-rw-r--r--perly.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/perly.c b/perly.c
index 61a6fd32aa..a98279a65c 100644
--- a/perly.c
+++ b/perly.c
@@ -1405,7 +1405,7 @@ static char *yyrule[] = {
#endif
#define yyparse() Perl_yyparse(pTHX)
-#line 1481 "perly.c"
+#line 1409 "perly.c"
#define YYABORT goto yyabort
#define YYACCEPT goto yyaccept
#define YYERROR goto yyerrlab
@@ -1437,7 +1437,7 @@ yyparse()
ysave->oldyylval = yylval;
#if YYDEBUG
- if (yys = getenv("YYDEBUG"))
+ if ((yys = getenv("YYDEBUG")))
{
yyn = *yys;
if (yyn >= '0' && yyn <= '9')
@@ -1464,7 +1464,7 @@ yyparse()
*yyssp = yystate = 0;
yyloop:
- if (yyn = yydefred[yystate]) goto yyreduce;
+ if ((yyn = yydefred[yystate])) goto yyreduce;
if (yychar < 0)
{
if ((yychar = yylex()) < 0) yychar = 0;
@@ -2455,7 +2455,7 @@ case 197:
#line 786 "perly.y"
{ yyval.opval = yyvsp[0].opval; }
break;
-#line 2477 "perly.c"
+#line 2459 "perly.c"
}
yyssp -= yym;
yystate = *yyssp;