summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorMalcolm Beattie <mbeattie@sable.ox.ac.uk>1998-02-06 15:06:18 +0000
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1998-02-06 15:06:18 +0000
commit49d8d3a1123fb996c090905424ed66f675b3df17 (patch)
tree6627148f7da2ca11dda917d271656821eb0b0a79 /sv.c
parent69dcf70cb27ded45873eb396cabbcbd82a21a2c8 (diff)
downloadperl-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.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/sv.c b/sv.c
index 38c0411156..61f8ba74a7 100644
--- a/sv.c
+++ b/sv.c
@@ -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;