From b7cdbfbe02e8f486aed2ed8290c3cb14d2c57021 Mon Sep 17 00:00:00 2001
From: Humza Shahid <humzasaur@gmail.com>
Date: Mon, 4 Aug 2025 10:59:01 +0100
Subject: [PATCH] log another exception-throwing test

---
 shell/exception-logger.sml |  2 +-
 test/regression.sml        | 14 ++++++++++++--
 2 files changed, 13 insertions(+), 3 deletions(-)

diff --git a/shell/exception-logger.sml b/shell/exception-logger.sml
index a6d1e54..8caa3cd 100644
--- a/shell/exception-logger.sml
+++ b/shell/exception-logger.sml
@@ -33,6 +33,6 @@ struct
       val () = TextIO.output (io, textOutput)
       val () = TextIO.closeOut io
     in
-      raise Empty
+      raise e
     end
 end
diff --git a/test/regression.sml b/test/regression.sml
index 67da7e1..da54692 100644
--- 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