summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-12-23 01:38:54 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-12-23 01:38:54 +0000
commiteb08e2da3ae8f4fa2493d690c28ed87301ed6ed9 (patch)
tree8d3338fbb5700f92ac5fc8aa35eb4246c979f6df /regexec.c
parentb7c83a7e594640c2503df864ea898c1fad026a14 (diff)
downloadperl-eb08e2da3ae8f4fa2493d690c28ed87301ed6ed9.tar.gz
Even more \X fixing.
p4raw-id: //depot/perl@13861
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/regexec.c b/regexec.c
index 8e5efb0093..d239a70144 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2603,7 +2603,9 @@ S_regmatch(pTHX_ regnode *prog)
locinput += UTF8SKIP(locinput);
if (locinput > PL_regeol)
sayNO;
- }
+ }
+ else
+ locinput++;
nextchr = UCHARAT(locinput);
break;
case REFFL: