One less -Wall whine (found under DEBUGGING).

p4raw-id: //depot/perl@10537

2 files changed, 2 insertions, 1 deletions

diff --git a/x2p/Makefile.SH b/x2p/Makefile.SH
index 5db022fd37..3b42c21948 100755
--- a/x2p/Makefile.SH
+++ b/x2p/Makefile.SH
@@ -119,6 +119,7 @@ run_byacc:	FORCE check_byacc
 	$(BYACC) a2p.y
 	rm -f a2p.c
 	sed -e 's/(yyn = yydefred\[yystate\])/((yyn = yydefred[yystate]))/' \
+	    -e 's/(yys = getenv("YYDEBUG"))/((yys = getenv("YYDEBUG")))/' \
 	    -e 's/^yyerrlab://' \
 	    -e 's/^    goto yyerrlab;//' \
 	    -e 's/^yynewerror://' \
diff --git a/x2p/a2p.c b/x2p/a2p.c
index 4cf6c5115c..357e8e46ae 100644
--- a/x2p/a2p.c
+++ b/x2p/a2p.c
@@ -2089,7 +2089,7 @@ yyparse()
     register char *yys;
     extern char *getenv();
 
-    if (yys = getenv("YYDEBUG"))
+    if ((yys = getenv("YYDEBUG")))
     {
         yyn = *yys;
         if (yyn >= '0' && yyn <= '9')