summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-07-28 13:45:02 -0600
committerKarl Williamson <khw@cpan.org>2022-07-28 14:30:33 -0600
commit8fbe3f6f1f4601bcc57d08281926626130213069 (patch)
tree1aeea643830f90c814f7549de7074da50a9c33ab /regexec.c
parentf217bf5e4223bccd8b36a3b91a90831a62b21437 (diff)
downloadperl-8fbe3f6f1f4601bcc57d08281926626130213069.tar.gz
Fix GH #20009, pattern match panic
This was the result of using the wrong case in a switch() Thanks to @bram-perl for the idea of the test case reduction
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/regexec.c b/regexec.c
index dfe9909869..184a4761ff 100644
--- a/regexec.c
+++ b/regexec.c
@@ -10365,7 +10365,7 @@ S_regrepeat(pTHX_ regexp *prog, char **startposp, const regnode *p,
}
break;
- case ANYOFHbbm:
+ case ANYOFHbbm_t8:
while ( hardcount < max
&& scan + 1 < this_eol
&& (U8) *scan == ANYOF_FLAGS(p)