diff options
| author | Tony Cook <tony@develop-help.com> | 2016-01-18 17:42:32 +1100 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2016-02-08 14:52:51 +1100 |
| commit | ac3b837b9e1b412c93837ea13eacd367439264ec (patch) | |
| tree | 1a57c2a1b3721be0a9d9e9b2aae739f1c0ba29bc /ext/B/t | |
| parent | 27895dda808516d2e00748a19f6648febae7161f (diff) | |
| download | perl-ac3b837b9e1b412c93837ea13eacd367439264ec.tar.gz | |
[perl #126410] keep the DESTROY cache in mro_meta
We're already keeping destroy_gen there, so keep the CV there too.
The previous implementation, introduced in 8c34e50d, kept the
destroy method cache in the stash's stash, which broke B's SvSTASH
method.
Before that, the DESTROY method was cached in overload magic.
A previous version of this patch didn't clear the destructor cache on
a clone, which caused ext/XS-APItest/t/clone_with_stack.t to fail.
Diffstat (limited to 'ext/B/t')
| -rw-r--r-- | ext/B/t/sv_stash.t | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/ext/B/t/sv_stash.t b/ext/B/t/sv_stash.t index eaaabcf8fe..e9abf4d55d 100644 --- a/ext/B/t/sv_stash.t +++ b/ext/B/t/sv_stash.t @@ -14,7 +14,6 @@ plan 1; # RT #126410 = used to coredump when doing SvSTASH on %version:: TODO: { - local $TODO = 'Broken since c07f9fb2c7 - revert of a revert: slowed down detruction with no DESTROY'; fresh_perl_is( 'use B; version->new("v5.22.0"); $s = B::svref_2object(\%version::); $s->SvSTASH; print "ok\n"', "ok\n", { stderr => 1 }, 'RT #126410 - SvSTASH against %version::' |