diff options
author | Nicholas Clark <nick@ccl4.org> | 2006-02-23 17:45:55 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2006-02-23 17:45:55 +0000 |
commit | 32777db77ef3ebe0f903c9762d2dd94575f9b4a6 (patch) | |
tree | 6b330b1399cb079a9dabcc31a1c9cd5af8500641 /xsutils.c | |
parent | 18398057001a49d54f2e8adca16127da595f53e7 (diff) | |
download | perl-32777db77ef3ebe0f903c9762d2dd94575f9b4a6.tar.gz |
In XS_attributes__guess_stash, attempting to call Gv* on a PVMG is
bad and wrong.
p4raw-id: //depot/perl@27288
Diffstat (limited to 'xsutils.c')
-rw-r--r-- | xsutils.c | 4 |
1 files changed, 0 insertions, 4 deletions
@@ -278,10 +278,6 @@ usage: else if (/* !CvANON(sv) && */ CvSTASH(sv)) stash = CvSTASH(sv); break; - case SVt_PVMG: - if (!(SvFAKE(sv) && SvTIED_mg(sv, PERL_MAGIC_glob))) - break; - /*FALLTHROUGH*/ case SVt_PVGV: if (GvGP(sv) && GvESTASH((GV*)sv)) stash = GvESTASH((GV*)sv); |