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.