This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
The Coverity audit is upset that the scream_olds variable is not
authorSteve Peters <steve@fisharerojo.org>
Thu, 9 Mar 2006 20:48:50 +0000 (20:48 +0000)
committerSteve Peters <steve@fisharerojo.org>
Thu, 9 Mar 2006 20:48:50 +0000 (20:48 +0000)
directly initialized, although it is likely initialized after
another variable takes a reference to it.

p4raw-id: //depot/perl@27448

regexec.c

index 919a12b..ccafd07 100644 (file)
--- a/regexec.c
+++ b/regexec.c
@@ -1632,7 +1632,7 @@ Perl_regexec_flags(pTHX_ register regexp *prog, char *stringarg, register char *
     I32 dontbother = 0;        /* how many characters not to try at end */
     I32 end_shift = 0;                 /* Same for the end. */         /* CC */
     I32 scream_pos = -1;               /* Internal iterator of scream. */
-    char *scream_olds;
+    char *scream_olds = NULL;
     SV* oreplsv = GvSV(PL_replgv);
     const bool do_utf8 = DO_UTF8(sv);
     const I32 multiline = prog->reganch & PMf_MULTILINE;