summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>1998-08-31 10:52:10 -0400
committerGurusamy Sarathy <gsar@cpan.org>1998-09-23 07:11:34 +0000
commit9fe1d20ca4c3d9b963b1df956fdf16ba3efc34f6 (patch)
treee297c92bca1e5a2493a8e5ebaefc65c715916fd4 /regexec.c
parent72720e3c89723833af2f8074486dfbeea0d9ac0d (diff)
downloadperl-9fe1d20ca4c3d9b963b1df956fdf16ba3efc34f6.tar.gz
(?>) broken in RE
Message-Id: <199808311852.OAA24676@monk.mps.ohio-state.edu> p4raw-id: //depot/perl@1828
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/regexec.c b/regexec.c
index 2bbe487955..bcba723d0f 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2245,6 +2245,7 @@ regmatch(regnode *prog)
sayYES; /* Success! */
case SUSPEND:
n = 1;
+ PL_reginput = locinput;
goto do_ifmatch;
case UNLESSM:
n = 0;