diff options
author | David Mitchell <davem@iabyn.com> | 2018-04-26 11:42:54 +0100 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2018-04-26 11:42:54 +0100 |
commit | d98f51adb895010fdfbe73640d0f92bb48669f24 (patch) | |
tree | 3175d853c3eff43c1a87c1f7cf03a052f33e015c /pp.c | |
parent | 5dbe8f0a915c25666dd9c760775f619c34a51538 (diff) | |
download | perl-d98f51adb895010fdfbe73640d0f92bb48669f24.tar.gz |
Revert "Unweaken refs in in-place reverse"
This reverts commit 5bad3c4f3a4515aaa622eecdf6f5a84fcaff7ed9.
See RT #132142.
For now, re-introduce the bug that fails to convert weak refs to strong
refs when sorting in place.
This is commit 1 of 2.
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 7 |
1 files changed, 0 insertions, 7 deletions
@@ -5618,14 +5618,7 @@ PP(pp_reverse) SV * const tmp = *begin; *begin++ = *end; *end-- = tmp; - - if (tmp && SvWEAKREF(tmp)) - sv_rvunweaken(tmp); } - - /* make sure we catch the middle element */ - if (begin == end && *begin && SvWEAKREF(*begin)) - sv_rvunweaken(*begin); } } } |