From 69118ed4e0172e96a633cbf88d2133591b701820 Mon Sep 17 00:00:00 2001
From: Scott Richmond <kredati@users.noreply.github.com>
Date: Sun, 3 Apr 2022 20:08:28 -0400
Subject: [PATCH] Use ex-info everywhere

---
 src/ludus/interpreter.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ludus/interpreter.clj b/src/ludus/interpreter.clj
index f4b3d97..60782b5 100644
--- a/src/ludus/interpreter.clj
+++ b/src/ludus/interpreter.clj
@@ -17,7 +17,7 @@
       (get ctx word)
       (if (contains? ctx ::parent)
         (recur word (::parent ctx))
-        (throw (new Exception (str "Unbound name: " word)))))))
+        (throw (ex-info (str "Unbound name: " word) {}))))))
 
 (declare interpret match)