commit 9cb7d376bcfefe377a24b24008288ea811d233a4
parent e7ada4437442a2aa85baf6458b387e27244c4c47
Author: Vlad-Stefan Harbuz <vlad@vlad.website>
Date: Sat, 28 Dec 2024 15:30:02 +0000
regex: add tests for jump bugs
Signed-off-by: Vlad-Stefan Harbuz <vlad@vlad.website>
Diffstat:
1 file changed, 6 insertions(+), 0 deletions(-)
diff --git a/regex/+test.ha b/regex/+test.ha
@@ -459,6 +459,12 @@ fn run_rawreplace_case(
(`foo[-ac]bar`, "foo-bar", matchres::MATCH, 0, 7),
(`[ac-]$`, "bde-", matchres::MATCH, 3, 4),
(`^[A-Za-z_-]+$`, "foo", matchres::MATCH, 0, 3),
+ // Tests for jump bugs
+ (`ab?c`, "ac", matchres::MATCH, 0, -1),
+ (`ab?c|z`, "ac", matchres::MATCH, 0, -1),
+ (`(ab?c){,1}`, "ac", matchres::MATCH, 0, -1),
+ (`(ab?c)?`, "ac", matchres::MATCH, 0, -1),
+ (`(ab?c)*`, "ac", matchres::MATCH, 0, -1),
// Tests from perl
(`abc`, "abc", matchres::MATCH, 0, -1),
(`abc`, "xbc", matchres::NOMATCH, 0, 0),