summaryrefslogtreecommitdiff
path: root/perly.y
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-07-18 03:51:03 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-07-18 03:51:03 +0000
commit2c15bef39460c09b2a7846a30a4fc1fc1c4f93e4 (patch)
tree956621b9bd6ef82607bc2044a25afda197257cef /perly.y
parent2aa1486d5d3f3b27276656f9b9ef842d3a21a386 (diff)
downloadperl-2c15bef39460c09b2a7846a30a4fc1fc1c4f93e4.tar.gz
remove spurious newSTATEOP() that causes goto to enter one too many
contexts when jumping between if and elsif blocks p4raw-id: //depot/perl@3692
Diffstat (limited to 'perly.y')
-rw-r--r--perly.y3
1 files changed, 1 insertions, 2 deletions
diff --git a/perly.y b/perly.y
index f1de7c751e..2594c087f7 100644
--- a/perly.y
+++ b/perly.y
@@ -174,8 +174,7 @@ else : /* NULL */
{ $$ = scope($2); }
| ELSIF '(' mexpr ')' mblock else
{ PL_copline = $1;
- $$ = newSTATEOP(0, Nullch,
- newCONDOP(0, $3, scope($5), $6));
+ $$ = newCONDOP(0, $3, scope($5), $6);
PL_hints |= HINT_BLOCK_SCOPE; }
;