diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-03-16 21:38:02 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-03-16 22:23:56 -0600 |
commit | 68f986b99c71413001891e9dff012b525d6d6d78 (patch) | |
tree | e4ae67885990001023e9177729d872a6e055343f /regcomp.c | |
parent | 75950e1cc27ab84d1342fb35e9bd50cca71fb090 (diff) | |
download | perl-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.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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 { |