diff options
author | Tony Cook <tony@develop-help.com> | 2023-05-01 14:48:41 +1000 |
---|---|---|
committer | Paul Evans <leonerd@leonerd.org.uk> | 2023-05-12 16:23:26 +0100 |
commit | 1cb47656bd2455cb88e83248911ba4138ccd4e7a (patch) | |
tree | ad8d12ef3cf5450185b3c043fafff1bb7398e93b /pp_hot.c | |
parent | 5462b17e4274b0f16b62d347717697c9e6ee193c (diff) | |
download | perl-1cb47656bd2455cb88e83248911ba4138ccd4e7a.tar.gz |
Revert "Perl_leave_adjust_stacks: don't make mortal copies of SvIMMORTAL SVs"
This reverts commit c56d7fa9134de66efe85a2fd70b28069c2629e0d.
Also un-TODO's the new test for this issue.
Fixes #21044
Diffstat (limited to 'pp_hot.c')
-rw-r--r-- | pp_hot.c | 7 |
1 files changed, 0 insertions, 7 deletions
@@ -5085,13 +5085,6 @@ Perl_leave_adjust_stacks(pTHX_ SV **from_sp, SV **to_sp, U8 gimme, int pass) } } } - else if (SvIMMORTAL(sv)){ - /* Since SvIMMORTALs are never freed, even when their - * refcount drops to zero, there's no benefit in - * creating a mortal copy. - */ - *++to_sp = sv; - } else { /* Make a mortal copy of the SV. * The following code is the equivalent of sv_mortalcopy() |