summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2021-05-10 07:30:24 -0600
committerKarl Williamson <khw@cpan.org>2021-05-28 15:23:57 -0600
commitc75fcb49fb8af210d2167a7d334ee071cce0b2c0 (patch)
tree4f479538e958ada0acb404b7e3eb9fb379a58fda /regexec.c
parentc2a3435ef5f8cff40037cf82f79a55a30b1ef0d0 (diff)
downloadperl-c75fcb49fb8af210d2167a7d334ee071cce0b2c0.tar.gz
regexec.c: Replace code with equivlent inline fcn
Don't repeat a paradigm
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/regexec.c b/regexec.c
index 452a298b9b..4e71e56522 100644
--- a/regexec.c
+++ b/regexec.c
@@ -6788,8 +6788,7 @@ S_regmatch(pTHX_ regmatch_info *reginfo, char *startpos, regnode *prog)
}
else {
if (utf8_target)
- while (chars--)
- uc += UTF8SKIP(uc);
+ uc = utf8_hop(uc, chars);
else
uc += chars;
}