perl 5.0 alpha 4

[editor's note: the sparc executables have not been included, and
emacs backup files have been removed.  This was reconstructed from a
tarball found on the September 1994 InfoMagic CD; the date of this is
approximate]

1 files changed, 1 insertions, 1 deletions

diff --git a/x2p/a2p.y b/x2p/a2p.y
index f333dad3e5..111a6f612b 100644
--- a/x2p/a2p.y
+++ b/x2p/a2p.y
@@ -171,7 +171,7 @@ term	: variable
 		{ $$ = oper2(OPOW,$1,$3); }
 	| term IN VAR
 		{ $$ = oper2(ODEFINED,aryrefarg($3),$1); }
-	| term '?' term ':' term
+	| cond '?' expr ':' expr
 		{ $$ = oper3(OCOND,$1,$3,$5); }
 	| variable INCR
 		{ $$ = oper1(OPOSTINCR,$1); }