summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2003-08-22 12:22:04 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2003-08-22 12:22:04 +0000
commit35272f8409cb5ab469f213e20bfc08cebdb0fe63 (patch)
tree66cf9580f675e36711b9485351102b15894abe1d /mg.c
parente7780b5602300c312c4e6b04e71654660380f12d (diff)
downloadperl-35272f8409cb5ab469f213e20bfc08cebdb0fe63.tar.gz
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
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index d298176481..185fd9a6c3 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;