diff options
author | Father Chrysostomos <sprout@cpan.org> | 2010-10-11 10:10:06 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2010-10-11 10:10:06 -0700 |
commit | 6f86b615fa775fad6cc0c49f0615f38543ff5c19 (patch) | |
tree | 0e7d5f0d49cec273aac625aa606baf759f4d7a97 /hv.h | |
parent | 29912d932cee5589d4165d5eff62d0cc4f2c5195 (diff) | |
download | perl-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.h | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -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. |