summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2021-08-07 14:07:20 -0600
committerKarl Williamson <khw@cpan.org>2021-08-07 14:27:01 -0600
commit72c1a704758e6a6e9191f78e46b8dd3e79487b5e (patch)
tree96142e576eb1dd053d7cc726f136beff63321a48 /regexec.c
parent2d8dd9eb480c087d4be38eccb70dfcbb265548de (diff)
downloadperl-72c1a704758e6a6e9191f78e46b8dd3e79487b5e.tar.gz
regexec.c: Add comment
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 25fc13d174..566574f05e 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2328,6 +2328,7 @@ S_find_byclass(pTHX_ regexp * prog, const regnode *c, char *s,
case ANYOFHs_t8_p8:
REXEC_FBC_FIND_NEXT_UTF8_STRING_SCAN(
((struct regnode_anyofhs *) c)->string,
+ /* Note FLAGS is the string length in this regnode */
((struct regnode_anyofhs *) c)->string + FLAGS(c),
reginclass(prog, c, (U8*)s, (U8*) strend,
1 /* is utf8 */));