From: Gurusamy Sarathy <gsar@cpan.org>
Date: Wed, 23 Sep 1998 02:54:15 +0000 (+0000)
Subject: silence redefined warning for XS(INIT) {}
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f8f842e4d8ec82e737e77ea159cd8409c6602cc1;p=p5sagit%2Fp5-mst-13.2.git

silence redefined warning for XS(INIT) {}

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

diff --git a/op.c b/op.c
index ca89229..5b06f6f 100644
--- a/op.c
+++ b/op.c
@@ -4019,6 +4019,7 @@ newXS(char *name, void (*subaddr) (CV * _CPERLproto), char *filename)
 	    if (!PL_initav)
 		PL_initav = newAV();
 	    av_push(PL_initav, (SV *)cv);
+	    GvCV(gv) = 0;
 	}
     }
     else