From 1ca434b30879abad194ce5835000ce97d1cb498a Mon Sep 17 00:00:00 2001
From: Scott Richmond <kredati@users.noreply.github.com>
Date: Tue, 24 May 2022 17:02:50 -0400
Subject: [PATCH] Remove old show cruft

---
 src/ludus/prelude.clj | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/src/ludus/prelude.clj b/src/ludus/prelude.clj
index a568d9f..51817a3 100644
--- a/src/ludus/prelude.clj
+++ b/src/ludus/prelude.clj
@@ -61,13 +61,6 @@
       (throw (ex-info "Cannot set! something that is not a ref" {}))
       ))})
 
-(declare show)
-
-(defn- show-vector [v]
-  (if (= (first v) ::data/tuple)
-    (str "(" (apply str (into [] (comp (map (:body show)) (interpose ", ")) (next v))) ")")
-    (str "[" (apply str (into [] (comp (map (:body show)) (interpose ", ")) v)) "]")))
-
 (def show {:name "show"
   ::data/type ::data/clj
   :body ludus.show/show})