summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2011-03-16 21:38:02 -0600
committerKarl Williamson <public@khwilliamson.com>2011-03-16 22:23:56 -0600
commit68f986b99c71413001891e9dff012b525d6d6d78 (patch)
treee4ae67885990001023e9177729d872a6e055343f /regcomp.c
parent75950e1cc27ab84d1342fb35e9bd50cca71fb090 (diff)
downloadperl-68f986b99c71413001891e9dff012b525d6d6d78.tar.gz
regcomp.c: Restore ptr correctly
oldp contains the pointer that we want to get to. Use that instead of a possibly invalid assumption about length
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/regcomp.c b/regcomp.c
index 9840097663..d03fe3e8ef 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -8787,7 +8787,7 @@ tryagain:
* position the parse so that this will be called again
* immediately */
if (len) {
- p = RExC_parse + len - 1;
+ p = oldp;
goto loopdone;
}
else {