Change 28058 hadn't been tested with -DPERL_CREATE_GVSV
Nicholas Clark [Thu, 25 Jan 2007 11:41:13 +0000 (11:41 +0000)]
p4raw-id: //depot/perl@29970

gv.c

diff --git a/gv.c b/gv.c
index 9c33b42..78e528f 100644 (file)
--- a/gv.c
+++ b/gv.c
@@ -171,7 +171,7 @@ Perl_newGP(pTHX_ GV *const gv)
     Newxz(gp, 1, GP);
 
 #ifndef PERL_DONT_CREATE_GVSV
-    gp->gv_sv = newSV(0);
+    gp->gp_sv = newSV(0);
 #endif
 
     gp->gp_line = PL_curcop ? CopLINE(PL_curcop) : 0;