From: Dave Mitchell <davem@fdisolutions.com>
Date: Sun, 29 Dec 2002 15:09:31 +0000 (+0000)
Subject: silence warning
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=40b8d195ef25e04da53075384ae3c1fd5b4b5876;p=p5sagit%2Fp5-mst-13.2.git

silence warning
Message-ID: <20021229150931.C2325@fdgroup.com>

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

diff --git a/pp_ctl.c b/pp_ctl.c
index 4ef44fd..ed392cc 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2559,7 +2559,7 @@ Perl_sv_compile_2op(pTHX_ SV *sv, OP** startop, char *code, PAD** padp)
     char *tmpbuf = tbuf;
     char *safestr;
     int runtime;
-    CV* runcv;
+    CV* runcv = Nullcv;	/* initialise to avoid compiler warnings */
 
     ENTER;
     lex_start(sv);