diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-19 14:20:15 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-19 14:20:15 +0000 |
| commit | afa38808e08264de7bcd3b2241ab41424d64d0d4 (patch) | |
| tree | 1583090506c0dd90a05b2cf83d6d7b777f57fcca /t/run | |
| parent | 69fba24299fa2cacab89b5ce52c142f3ee54136e (diff) | |
| download | perl-afa38808e08264de7bcd3b2241ab41424d64d0d4.tar.gz | |
Retract the #10451 which seems to be the cause
of the major leakage from while(){eval"sub{}"}
p4raw-id: //depot/perl@12506
Diffstat (limited to 't/run')
| -rw-r--r-- | t/run/kill_perl.t | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/t/run/kill_perl.t b/t/run/kill_perl.t index ce98e01807..7e4f3a8b8e 100644 --- a/t/run/kill_perl.t +++ b/t/run/kill_perl.t @@ -629,16 +629,6 @@ EOT EXPECT ok ######## -# test that closures generated by eval"" hold on to the CV of the eval"" -# for their entire lifetime -$code = eval q[ - sub { eval '$x = "ok 1\n"'; } -]; -&{$code}(); -print $x; -EXPECT -ok 1 -######## # This test is here instead of pragma/locale.t because # the bug depends on in the internal state of the locale # settings and pragma/locale messes up that state pretty badly. |