summaryrefslogtreecommitdiff
path: root/hv.h
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2010-10-11 10:10:06 -0700
committerFather Chrysostomos <sprout@cpan.org>2010-10-11 10:10:06 -0700
commit6f86b615fa775fad6cc0c49f0615f38543ff5c19 (patch)
tree0e7d5f0d49cec273aac625aa606baf759f4d7a97 /hv.h
parent29912d932cee5589d4165d5eff62d0cc4f2c5195 (diff)
downloadperl-6f86b615fa775fad6cc0c49f0615f38543ff5c19.tar.gz
Allow mro_isa_changed_in to be called on nonexistent packages
This is necessary for an upcoming bug fix. (For this bug: @left::ISA = 'outer::inner'; @right::ISA = 'clone::inner'; *clone:: = \%outer::; print left->isa('clone::inner'),"\n"; print right->isa('outer::inner'),"\n"; ) This commit actually replaces mro_isa_changed_in with mro_isa_changed_in3. See the docs for it in the diff for mro.c.
Diffstat (limited to 'hv.h')
-rw-r--r--hv.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/hv.h b/hv.h
index 62646b3965..83f90d9a52 100644
--- a/hv.h
+++ b/hv.h
@@ -67,6 +67,7 @@ struct mro_meta {
(((smeta)->mro_which && (which) == (smeta)->mro_which) \
? (smeta)->mro_linear_current \
: Perl_mro_get_private_data(aTHX_ (smeta), (which)))
+#define mro_isa_changed_in(stash) mro_isa_changed_in3(stash, NULL, 0)
/* Subject to change.
Don't access this directly.