From: Gurusamy Sarathy <gsar@cpan.org>
Date: Thu, 9 Dec 1999 00:13:06 +0000 (+0000)
Subject: avoid initializing GvCV slot for autovivified filehandles
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2d6d9f7a85258c4d9bd37d884754ead5775be3b9;p=p5sagit%2Fp5-mst-13.2.git

avoid initializing GvCV slot for autovivified filehandles

p4raw-id: //depot/perl@4670
---

diff --git a/pp.c b/pp.c
index c14a05c..24ce99c 100644
--- a/pp.c
+++ b/pp.c
@@ -247,7 +247,7 @@ PP(pp_rv2gv)
 			STRLEN len;
 			SV *namesv = PL_curpad[cUNOP->op_targ];
 			name = SvPV(namesv, len);
-			gv = (GV*)NEWSV(0,len);
+			gv = (GV*)NEWSV(0,0);
 			gv_init(gv, CopSTASH(PL_curcop), name, len, 0);
 		    }
 		    else {