From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 30 Jul 2003 18:15:49 +0000 (+0000)
Subject: Silly gcc.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=84458fbffe05ae6726e1d9394044d8220c5634eb;p=p5sagit%2Fp5-mst-13.2.git

Silly gcc.

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

diff --git a/perl.c b/perl.c
index 3600eb9..23d2b95 100644
--- a/perl.c
+++ b/perl.c
@@ -935,7 +935,7 @@ setuid perl scripts securely.\n");
 	 * the area we are able to modify is limited to the size of
 	 * the original argv[0].  (See below for 'contiguous', though.)
 	 * --jhi */
-	 char *s;
+	 char *s = NULL;
 	 int i;
 	 UV mask =
 	   ~(UV)(PTRSIZE == 4 ? 3 : PTRSIZE == 8 ? 7 : PTRSIZE == 16 ? 15 : 0);