summaryrefslogtreecommitdiff
path: root/mro.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2013-08-18 00:36:05 -0700
committerFather Chrysostomos <sprout@cpan.org>2013-08-20 21:38:07 -0700
commit1a33a0598e4c684205d292afcb97de6d79d17e7d (patch)
tree34a64f222166ccd05778cccd6b37ce3fb422480e /mro.c
parentf4e351526e2ec659f343cef887d21cf21a8fc8ce (diff)
downloadperl-1a33a0598e4c684205d292afcb97de6d79d17e7d.tar.gz
Move super cache into mro meta
Iterated hashes shouldn’t have to allocate space for something specific to stashes, so move the SUPER method cache from the HvAUX struct (which all iterated hashes have) into the mro meta struct (which only stashes have).
Diffstat (limited to 'mro.c')
-rw-r--r--mro.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/mro.c b/mro.c
index cb679503a4..2ce9fa2da3 100644
--- a/mro.c
+++ b/mro.c
@@ -186,6 +186,8 @@ Perl_mro_meta_dup(pTHX_ struct mro_meta* smeta, CLONE_PARAMS* param)
newmeta->isa
= MUTABLE_HV(sv_dup_inc((const SV *)newmeta->isa, param));
+ newmeta->super = NULL;
+
return newmeta;
}