summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-02-02 08:04:52 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-02-02 08:04:52 +0000
commitfc19f8d03323992b29a43eebb298905a1efdc984 (patch)
tree94a390160dd737098ecdfa2ae39bf4cd9e4fef0b /pp_hot.c
parentea3105be5e2358251beae0304b59a16554680936 (diff)
downloadperl-fc19f8d03323992b29a43eebb298905a1efdc984.tar.gz
fix coredump on C<"x" =~ /x/; print @-> (from Ilya Zakharevich)
p4raw-id: //depot/perl@4957
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/pp_hot.c b/pp_hot.c
index 6ebde09c29..133265a1a7 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1041,6 +1041,7 @@ yup: /* Confirmed by INTUIT */
rx->startp[0] = s - truebase;
rx->endp[0] = s - truebase + rx->minlen;
}
+ rx->nparens = rx->lastparen = 0; /* used by @- and @+ */
LEAVE_SCOPE(oldsave);
RETPUSHYES;