From 140deebb80c9e31fffcafef5e5d1febdb9822d13 Mon Sep 17 00:00:00 2001
From: Rudi Grinberg <me@rgrinberg.com>
Date: Fri, 1 Nov 2024 20:09:03 +0000
Subject: [PATCH] test(str): incorrect group specification (#567)

---
 lib_test/expect/test_str.ml | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lib_test/expect/test_str.ml b/lib_test/expect/test_str.ml
index 720def3..b598d8d 100644
--- a/lib_test/expect/test_str.ml
+++ b/lib_test/expect/test_str.ml
@@ -240,7 +240,12 @@ let%expect_test "match semantics" =
 
 let%expect_test "Group (or submatch)" =
   eq_match "\\(a\\)\\(a\\)?\\(b\\)" "ab";
-  [%expect {| |}]
+  [%expect {| |}];
+  eq_match "\\(foo" "foo";
+  [%expect {|
+    str: (Error "Failure(\"\\\\( group not closed by \\\\)\")")
+    re: (Error Re_private.Emacs.Parse_error)
+    |}]
 ;;
 
 let%expect_test "Character set" =