diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-07 22:57:52 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-07 22:57:52 +0000 |
commit | 38a230cb455fb1aca316039ba1d4aed58c0c60d5 (patch) | |
tree | 867dcdec0469ba7ff2832d2d367f0d22bda7c1c7 /perly.c | |
parent | 2e20e14f06deb037c08540fe454d89e37322092d (diff) | |
download | perl-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.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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" |