diff options
author | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-02-06 15:06:18 +0000 |
---|---|---|
committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-02-06 15:06:18 +0000 |
commit | 49d8d3a1123fb996c090905424ed66f675b3df17 (patch) | |
tree | 6627148f7da2ca11dda917d271656821eb0b0a79 /sv.c | |
parent | 69dcf70cb27ded45873eb396cabbcbd82a21a2c8 (diff) | |
download | perl-49d8d3a1123fb996c090905424ed66f675b3df17.tar.gz |
More Chip patches:
Subject: [PATCH] Fix SEGV from combining caller and C<package;>
Date: Thu, 5 Feb 1998 21:47:50 -0500 (EST)
Subject: [PATCH] Fix line numbers after here documents in eval STRING
Date: Thu, 5 Feb 1998 21:50:08 -0500 (EST)
Subject: [PATCH] Make recursive lexical analysis more robust
Date: Thu, 5 Feb 1998 21:57:02 -0500 (EST)
p4raw-id: //depot/perl@464
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -3553,6 +3553,9 @@ sv_reset(register char *s, HV *stash) register I32 max; char todo[256]; + if (!stash) + return; + if (!*s) { /* reset ?? searches */ for (pm = HvPMROOT(stash); pm; pm = pm->op_pmnext) { pm->op_pmflags &= ~PMf_USED; |