diff options
author | Craig A. Berry <craigberry@mac.com> | 2007-05-19 01:00:15 +0000 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2007-05-19 01:00:15 +0000 |
commit | 70cd14a10b623c21342f84d4826106411378add8 (patch) | |
tree | 386bb0a793d7a265effe7ec2390084acba939c78 /mg.c | |
parent | 18b9e6f5b84f2d3457be2e55295072eec926f1d7 (diff) | |
download | perl-70cd14a10b623c21342f84d4826106411378add8.tar.gz |
Various mro updates from Brandon Black. References:
<84621a60705111347q40f9dd9ciefa9468e9ff9ca6c@mail.gmail.com>
<84621a60705121458i34ff361fh9166e8558781df41@mail.gmail.com>
<84621a60705141111q70ed307r9181dfc2834a8f5c@mail.gmail.com>
<84621a60705160937h53946fcfg70635908302724e8@mail.gmail.com>
p4raw-id: //depot/perl@31239
Diffstat (limited to 'mg.c')
-rw-r--r-- | mg.c | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -1519,6 +1519,11 @@ Perl_magic_setisa(pTHX_ SV *sv, MAGIC *mg) /* Bail out if destruction is going on */ if(PL_dirty) return 0; + /* XXX Once it's possible, we need to + detect that our @ISA is aliased in + other stashes, and act on the stashes + of all of the aliases */ + /* The first case occurs via setisa, the second via setisa_elem, which calls this same magic */ |