diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-11-19 21:06:01 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-11-19 21:06:01 +0000 |
| commit | 9133b6393363c0c6671c1b2c6b2ecadb3ff402ee (patch) | |
| tree | e5733590379b01e4b042c5c8b61a3bce38c468c1 /opcode.pl | |
| parent | 1388f78e6435bdc1f8dfb795b726c64c719a88aa (diff) | |
| download | perl-9133b6393363c0c6671c1b2c6b2ecadb3ff402ee.tar.gz | |
Fix bug [perl #24508] Wrong assignment in nested assignment
together with subroutine call
Apparently concat still doesn't deal correctly with lexicals
in all cases. Disable the whole TARGET_MY optimisation for it.
(and remove the corresponding code from the peephole optimiser.)
p4raw-id: //depot/perl@21752
Diffstat (limited to 'opcode.pl')
| -rwxr-xr-x | opcode.pl | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -537,7 +537,7 @@ add addition (+) ck_null IfsT2 S S i_add integer addition (+) ck_null ifsT2 S S subtract subtraction (-) ck_null IfsT2 S S i_subtract integer subtraction (-) ck_null ifsT2 S S -concat concatenation (.) or string ck_concat fsT2 S S +concat concatenation (.) or string ck_concat fst2 S S stringify string ck_fun fsT@ S left_shift left bitshift (<<) ck_bitop fsT2 S S |