From: Steve Peters <steve@fisharerojo.org>
Date: Thu, 9 Mar 2006 20:48:50 +0000 (+0000)
Subject: The Coverity audit is upset that the scream_olds variable is not
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ccac19ea313fd7152f9ddb5b7dd90f6ebe7ef7b9;p=p5sagit%2Fp5-mst-13.2.git

The Coverity audit is upset that the scream_olds variable is not
directly initialized, although it is likely initialized after
another variable takes a reference to it.

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

diff --git a/regexec.c b/regexec.c
index 919a12b..ccafd07 100644
--- 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;