Change 33327 by [EMAIL PROTECTED] on 2008/02/18 10:54:15

        Subject: [ patch ] silence 2 possibly uninitialized vars
        From: Jim Cromie <[EMAIL PROTECTED]>
        Date: Sat, 16 Feb 2008 18:02:19 -0700
        Message-ID: <[EMAIL PROTECTED]>

Affected files ...

... //depot/perl/toke.c#818 edit

Differences ...

==== //depot/perl/toke.c#818 (text) ====
Index: perl/toke.c
--- perl/toke.c#817~33291~      2008-02-12 05:15:20.000000000 -0800
+++ perl/toke.c 2008-02-18 02:54:15.000000000 -0800
@@ -6670,7 +6670,7 @@
                    (*s == ':' && s[1] == ':'))
                {
 #ifdef PERL_MAD
-                   SV *nametoke;
+                   SV *nametoke = NULL;
 #endif
 
                    PL_expect = XBLOCK;
@@ -12372,8 +12372,8 @@
     bool eofmt = FALSE;
 #ifdef PERL_MAD
     char *tokenstart = s;
-    SV* savewhite;
-    
+    SV* savewhite = NULL;
+
     if (PL_madskills) {
        savewhite = PL_thiswhite;
        PL_thiswhite = 0;
End of Patch.

Reply via email to