From: Dave Mitchell <davem@fdisolutions.com>
Date: Mon, 24 Sep 2007 01:20:00 +0000 (+0000)
Subject: silence a spurious compiler warning in regcomp.c
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7cf3a6a3b1c2b0edcdd2a882c2d730810d8f9910;p=p5sagit%2Fp5-mst-13.2.git

silence a spurious compiler warning in regcomp.c

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

diff --git a/regcomp.c b/regcomp.c
index 441d762..f876c54 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -6831,6 +6831,7 @@ tryagain:
     case 0xCE:
         if (!LOC && FOLD) {
             U32 len,cp;
+	    len=0; /* silence a spurious compiler warning */
             if ((cp = what_len_TRICKYFOLD_safe(RExC_parse,RExC_end,UTF,len))) {
                 *flagp |= HASWIDTH; /* could be SIMPLE too, but needs a handler in regexec.regrepeat */
                 RExC_parse+=len-1; /* we get one from nextchar() as well. :-( */