summaryrefslogtreecommitdiff
path: root/perly.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-10-07 22:57:52 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-10-07 22:57:52 +0000
commit38a230cb455fb1aca316039ba1d4aed58c0c60d5 (patch)
tree867dcdec0469ba7ff2832d2d367f0d22bda7c1c7 /perly.c
parent2e20e14f06deb037c08540fe454d89e37322092d (diff)
downloadperl-38a230cb455fb1aca316039ba1d4aed58c0c60d5.tar.gz
change#3728 was flawed (loop contexts saw the wrong statement
info, causing loop control constructs to not find the label); disable OP_SETSTATE entirely and add a fix that is specifically targetted at disabling the OP_LINESEQ optimization in else BLOCK, which was what the original patch was supposed to fix TODO: remove the remainder of the setstate logic if it can't be used anywhere else (it isn't used anywhere now) p4raw-link: @3728 on //depot/perl: 7399586d384137f7ae66bcc82a83b0df7dd429e5 p4raw-id: //depot/perl@4309
Diffstat (limited to 'perly.c')
-rw-r--r--perly.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/perly.c b/perly.c
index e1458d8ed3..9b619c9fcb 100644
--- a/perly.c
+++ b/perly.c
@@ -1662,7 +1662,7 @@ case 21:
break;
case 22:
#line 203 "perly.y"
-{ yyval.opval = scope(yyvsp[0].opval); }
+{ (yyvsp[0].opval)->op_flags |= OPf_PARENS; yyval.opval = scope(yyvsp[0].opval); }
break;
case 23:
#line 205 "perly.y"