From c822f08a5087943f7d9e2c36ce42ea035f03ab97 Mon Sep 17 00:00:00 2001
From: Chip Salzenberg <chip@atlantic.net>
Date: Mon, 18 Nov 1996 18:22:52 +1200
Subject: Fix a2p translation of '{print "a" "b" "c"}'

---
 x2p/a2p.y | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'x2p/a2p.y')

diff --git a/x2p/a2p.y b/x2p/a2p.y
index 961e2f280f..6dd340c1df 100644
--- a/x2p/a2p.y
+++ b/x2p/a2p.y
@@ -133,6 +133,8 @@ expr	: term
 		{ $$ = $1; }
 	| expr term
 		{ $$ = oper2(OCONCAT,$1,$2); }
+	| expr '?' expr ':' expr
+		{ $$ = oper3(OCOND,$1,$3,$5); }
 	| variable ASGNOP cond
 		{ $$ = oper3(OASSIGN,$2,$1,$3);
 			if ((ops[$1].ival & 255) == OFLD)
@@ -162,8 +164,6 @@ term	: variable
 		{ $$ = oper2(OPOW,$1,$3); }
 	| term IN VAR
 		{ $$ = oper2(ODEFINED,aryrefarg($3),$1); }
-	| cond '?' expr ':' expr
-		{ $$ = oper3(OCOND,$1,$3,$5); }
 	| variable INCR
 		{ $$ = oper1(OPOSTINCR,$1); }
 	| variable DECR
-- 
cgit v1.2.1