From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 22 Aug 2003 12:22:04 +0000 (+0000)
Subject: The change #20809 opened up a code path that might leave s unset.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=35272f8409cb5ab469f213e20bfc08cebdb0fe63;p=p5sagit%2Fp5-mst-13.2.git

The change #20809 opened up a code path that might leave s unset.
p4raw-link: @20809 on //depot/perl: 0daa599b568c3d2373a59e6063e86a6f865719a8

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

diff --git a/mg.c b/mg.c
index d298176..185fd9a 100644
--- a/mg.c
+++ b/mg.c
@@ -547,7 +547,7 @@ int
 Perl_magic_get(pTHX_ SV *sv, MAGIC *mg)
 {
     register I32 paren;
-    register char *s;
+    register char *s = NULL;
     register I32 i;
     register REGEXP *rx;