summaryrefslogtreecommitdiff
path: root/gv.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2006-02-23 18:00:19 +0000
committerNicholas Clark <nick@ccl4.org>2006-02-23 18:00:19 +0000
commitc0c446747ad6c5bde53bc8415ca16ef77f6320f2 (patch)
tree93c44ce727b19ed69ac39f8e982a9e958892bf57 /gv.c
parent32777db77ef3ebe0f903c9762d2dd94575f9b4a6 (diff)
downloadperl-c0c446747ad6c5bde53bc8415ca16ef77f6320f2.tar.gz
Remove set magic from typeglobs. Remove typeglob magic entirely.
Typeglobs now never access the SvPVX, SvIVX or SvNVX when holding a valid GvGP(). p4raw-id: //depot/perl@27289
Diffstat (limited to 'gv.c')
-rw-r--r--gv.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/gv.c b/gv.c
index 20c2d47fe6..7197e26e9f 100644
--- a/gv.c
+++ b/gv.c
@@ -204,7 +204,6 @@ Perl_gv_init(pTHX_ GV *gv, HV *stash, const char *name, STRLEN len, int multi)
GvFILE(gv) = CopFILE(PL_curcop) ? CopFILE(PL_curcop) : (char *) "";
GvCVGEN(gv) = 0;
GvEGV(gv) = gv;
- sv_magic((SV*)gv, (SV*)gv, PERL_MAGIC_glob, NULL, 0);
SvSCREAM_on(gv);
GvSTASH(gv) = stash;
if (stash)