From 1cb47656bd2455cb88e83248911ba4138ccd4e7a Mon Sep 17 00:00:00 2001
From: Tony Cook <tony@develop-help.com>
Date: Mon, 1 May 2023 14:48:41 +1000
Subject: 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
---
 t/op/sub.t | 3 ---
 1 file changed, 3 deletions(-)

(limited to 't')

diff --git a/t/op/sub.t b/t/op/sub.t
index 0eae1d50de..e703880ec8 100644
--- a/t/op/sub.t
+++ b/t/op/sub.t
@@ -445,8 +445,5 @@ fresh_perl_like(
 );
 
 # github #21044
-{
-    local $TODO = "sub return values not modifiable";
 ok( eval { $_->{x} = 1 for sub { undef }->(); 1 }, "check sub return values are modifiable")
   or diag $@;
-}
-- 
cgit v1.2.1