log another exception-throwing test

2025-08-04 10:59:01 +01:00
parent 229bf59f5d
commit b7cdbfbe02
2 changed files with 13 additions and 3 deletions
--- a/test/regression.sml
+++ b/test/regression.sml
@@ -43,12 +43,22 @@ struct
       let
         val app = appFromText initialText
         val history = "G12dk"
-         val history = "100G55dkz33dk"
         val newApp = applyChars (history, app)
       in
         (* just expect that we do not fail or throw an exception *)
         Expect.isTrue true
-       end)]
+       end),
+
+       test "idk yet" (fn _ =>
+       let
+         val app = appFromText initialText
+         val history = "16G18ddjjjjjjjjjdkdkdkjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj"
+         val newApp = applyChars (history, app)
+       in
+         Expect.isTrue true
+       end
+       )
+    ]

  val tests = [charEventTests]
 end