summaryrefslogtreecommitdiff
path: root/xsutils.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2006-02-23 17:45:55 +0000
committerNicholas Clark <nick@ccl4.org>2006-02-23 17:45:55 +0000
commit32777db77ef3ebe0f903c9762d2dd94575f9b4a6 (patch)
tree6b330b1399cb079a9dabcc31a1c9cd5af8500641 /xsutils.c
parent18398057001a49d54f2e8adca16127da595f53e7 (diff)
downloadperl-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.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/xsutils.c b/xsutils.c
index 59a249616b..94d765243c 100644
--- a/xsutils.c
+++ b/xsutils.c
@@ -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);