From 015d079d5715baaf4fe71dddeb72045bbcca6cba Mon Sep 17 00:00:00 2001 From: Scott Richmond Date: Thu, 2 Jun 2022 14:56:03 -0400 Subject: [PATCH] hashmap->dict cleanup --- src/ludus/show.clj | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/ludus/show.clj b/src/ludus/show.clj index aa0ee4f..b39ccdf 100644 --- a/src/ludus/show.clj +++ b/src/ludus/show.clj @@ -27,11 +27,11 @@ (::data/ref v) ;; TODO: reconsider this (str "ref:" (::data/name v) " <" (deref (::data/value v)) ">") - (::data/hashmap v) - (str "#{" (apply str (into [] show-keyed (dissoc v ::data/hashmap))) "}") + (::data/dict v) + (str "#{" (apply str (into [] show-keyed (dissoc v ::data/dict))) "}") :else - (pp/pprint v))) + (pr-str v))) (defn- show-set [v] (str "${" (apply str (into [] show-linear v)) "}"))