diff options
author | David Mitchell <davem@iabyn.com> | 2015-10-15 11:47:07 +0100 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-02-03 08:59:42 +0000 |
commit | 94a11f7c2b35ca4c446f3aa0ffff73539bfd267f (patch) | |
tree | 62237d4463c76579a2201be02c03b69606b55938 /pp_sort.c | |
parent | b042e3289b4fb004aeb597fff6026d9df30aee80 (diff) | |
download | perl-94a11f7c2b35ca4c446f3aa0ffff73539bfd267f.tar.gz |
do PL_tmps_floor save in PUSHBLOCK
Currently every individual PUSHFOO type does
cx->cx_u.cx_blk.blku_old_tmpsfloor = PL_tmps_floor;
PL_tmps_floor = PL_tmps_ix;
Move all these into PUSHBLOCK instead, which usually immediately precedes
the PUSHFOO.
Diffstat (limited to 'pp_sort.c')
-rw-r--r-- | pp_sort.c | 5 |
1 files changed, 0 insertions, 5 deletions
@@ -1691,11 +1691,6 @@ PP(pp_sort) } } - else { - /* /sort BLOCK: CXt_NULL */ - cx->cx_u.cx_blk.blku_old_tmpsfloor = PL_tmps_floor; - PL_tmps_floor = PL_tmps_ix; - } cx->cx_u.cx_blk.blku_old_savestack_ix = old_savestack_ix; start = p1 - max; |