diff options
author | Father Chrysostomos <sprout@cpan.org> | 2014-12-28 23:13:26 -0800 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2014-12-29 06:06:38 -0800 |
commit | d187b712a6af2c12904446f06de1eb336ab61a72 (patch) | |
tree | fda43d64dfc657b79a697883682f076cc6cf612b /pp.c | |
parent | fa4d2728e1c1647c2f95c563fa81c5054e32c80c (diff) | |
download | perl-d187b712a6af2c12904446f06de1eb336ab61a72.tar.gz |
Call FETCH once for values in {...}
I broke this inadvertently in v5.17.5-55-g3ed356d while fixing a
memory leak.
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -5037,7 +5037,7 @@ PP(pp_anonhash) MARK++; SvGETMAGIC(*MARK); val = newSV(0); - sv_setsv(val, *MARK); + sv_setsv_nomg(val, *MARK); } else { |