diff options
author | Nicholas Clark <nick@ccl4.org> | 2006-02-23 18:00:19 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2006-02-23 18:00:19 +0000 |
commit | c0c446747ad6c5bde53bc8415ca16ef77f6320f2 (patch) | |
tree | 93c44ce727b19ed69ac39f8e982a9e958892bf57 /gv.c | |
parent | 32777db77ef3ebe0f903c9762d2dd94575f9b4a6 (diff) | |
download | perl-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.c | 1 |
1 files changed, 0 insertions, 1 deletions
@@ -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) |