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 /embed.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 'embed.h')
-rw-r--r-- | embed.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1049,7 +1049,7 @@ #define magic_wipepack(a,b) Perl_magic_wipepack(aTHX_ a,b) #define mg_localize(a,b,c) Perl_mg_localize(aTHX_ a,b,c) #define mode_from_discipline(a,b) Perl_mode_from_discipline(aTHX_ a,b) -#define mro_isa_changed_in(a) Perl_mro_isa_changed_in(aTHX_ a) +#define mro_isa_changed_in3(a,b,c) Perl_mro_isa_changed_in3(aTHX_ a,b,c) #define mro_package_moved(a) Perl_mro_package_moved(aTHX_ a) #define munge_qwlist_to_paren_list(a) Perl_munge_qwlist_to_paren_list(aTHX_ a) #define my_attrs(a,b) Perl_my_attrs(aTHX_ a,b) |