X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl.c;h=4c69293bb80a8d8a746693c33e75f680b9a8b4ae;hb=80a5d8e74b5512d4ab704d0e83466ae41247ce55;hp=1a5ec5c5b51484fe088615ec3d9bbd2b0622aa3c;hpb=004283b80f6094bb85aba6f48a74e3c5c34ea24f;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perl.c b/perl.c index 1a5ec5c..4c69293 100644 --- a/perl.c +++ b/perl.c @@ -2686,8 +2686,6 @@ S_init_main_stash(pTHX) { GV *gv; - - PL_curstash = PL_defstash = newHV(); PL_curstname = newSVpvn("main",4); gv = gv_fetchpv("main::",TRUE, SVt_PVHV);