This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
silence warning
authorDave Mitchell <davem@fdisolutions.com>
Sun, 29 Dec 2002 15:09:31 +0000 (15:09 +0000)
committerhv <hv@crypt.org>
Tue, 21 Jan 2003 00:24:11 +0000 (00:24 +0000)
Message-ID: <20021229150931.C2325@fdgroup.com>

p4raw-id: //depot/perl@18528

pp_ctl.c

index 4ef44fd..ed392cc 100644 (file)
--- 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);