; Add regression test for bug#65726

* test/src/regex-emacs-tests.el
(regex-tests-mutual-exclusive-inf-rec): New test.
This commit is contained in:
Mattias Engdegård 2023-09-05 15:39:29 +02:00
parent 6fad73d7cc
commit 8a9e653cc8

View file

@ -883,4 +883,8 @@ This evaluates the TESTS test cases from glibc."
(should (looking-at "x*\\(=\\|:\\)*"))
(should (looking-at "x*=*?"))))
(ert-deftest regex-tests-mutual-exclusive-inf-rec ()
;; Regression test for bug#65726, where this crashed Emacs.
(should (equal (string-match "a*\\(?:c\\|b*\\)*" "a") 0)))
;;; regex-emacs-tests.el ends here