summaryrefslogtreecommitdiff
path: root/perly.y
diff options
context:
space:
mode:
authorHugo van der Sanden <hv@crypt.org>2002-12-20 00:35:27 +0000
committerhv <hv@crypt.org>2002-12-23 03:36:26 +0000
commite9bdcc27a1d9b3f31b4d8c3678dd1346910c9b4d (patch)
treedca7ea6b1fcce75741a00aa3b14cc349dbf9354f /perly.y
parentf800e14d03e1bfa2cf42b86e56c0183cd5875618 (diff)
downloadperl-e9bdcc27a1d9b3f31b4d8c3678dd1346910c9b4d.tar.gz
Reverse #18285, for reasons given in:
Subject: Re: Precedence of ? : Message-Id: <200212200035.gBK0ZRm29309@crypt.compulink.co.uk> p4raw-id: //depot/perl@18336
Diffstat (limited to 'perly.y')
-rw-r--r--perly.y2
1 files changed, 1 insertions, 1 deletions
diff --git a/perly.y b/perly.y
index 4e00281bcb..7d39242160 100644
--- a/perly.y
+++ b/perly.y
@@ -627,7 +627,7 @@ term : termbinop
| termunop
| anonymous
| termdo
- | term '?' expr ':' term
+ | term '?' term ':' term
{ $$ = newCONDOP(0, $1, $3, $5); }
| REFGEN term /* \$x, \@y, \%z */
{ $$ = newUNOP(OP_REFGEN, 0, mod($2,OP_REFGEN)); }