add failing non-greedy test example

Issue #1020.
2025-05-18 13:19:18 +02:00 · 2025-04-01 10:36:06 +09:00 · 2025-04-01 10:36:06 +09:00 · 6891ba1a33
commit 6891ba1a33
parent f8600d444f
1 changed files with 3 additions and 0 deletions
--- a/lib/chibi/regexp-test.sld
+++ b/lib/chibi/regexp-test.sld
@ -151,6 +151,9 @@
      (test-re '("abc  " "")
               '(: ($ (*? alpha)) (* any))
               "abc  ")
+      ;; (test-re-search '("a-z")
+      ;;                 '(: "a" (*? any) "z")
+      ;;                 "a-z-z")
      (test-re '("<em>Hello World</em>" "em>Hello World</em")
               '(: "<" ($ (* any)) ">" (* any))
               "<em>Hello World</em>")