From: Mattias Engdegård <mattiase@acm.org>
Date: Tue, 5 Sep 2023 13:39:29 +0000 (+0200)
Subject: ; Add regression test for bug#65726
X-Git-Tag: emacs-29.1.90~139
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8a9e653cc82e85c2d3505d9f5511ed0484ea4ff1;p=emacs.git

; Add regression test for bug#65726

* test/src/regex-emacs-tests.el
(regex-tests-mutual-exclusive-inf-rec): New test.
---

diff --git a/test/src/regex-emacs-tests.el b/test/src/regex-emacs-tests.el
index c8f161c9b24..c074100e17f 100644
--- a/test/src/regex-emacs-tests.el
+++ b/test/src/regex-emacs-tests.el
@@ -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