   assoc2
   [zmap key val]
   (let [existing (find zmap key)]
-  (cond existing
-    ;XXX: yep this check has to be inside the swap! or else we can't use atom
-    (q/thro exceptionThrownWhenKeyAlreadyDefined
-    "already defined/exists key:`" key 
-    "` as `" existing 
-    "` you wanted to set val: `" val 
-    "` in map `" zmap "`"
-          ;)
+    (cond existing
+      ;XXX: yep this check has to be inside the swap! or else we can't use atom
+      (q/thro exceptionThrownWhenKeyAlreadyDefined
+        "already defined/exists key:`" key 
+        "` as `" existing 
+        "` you wanted to set val: `" val 
+        "` in map `" zmap "`"
         ;)
-      )
-    :else ;it's nil aka not already existing, so
-    (assoc zmap key val)
-    )
-  )
+        ;)
+        )
+      :else ;it's nil aka not already existing, so
+      (assoc zmap key val)
+      )
+    )
   )
 
 (defn

(show_state)
(gotests)



    )
  )

(defn -cleanMaps []
  (dosync
    (ref-set -allKeysToSymbols (empty @-allKeysToSymbols))
    (ref-set -allSymbolsToKeys (empty @-allSymbolsToKeys))
    )
  nil
  )

(def exceptionThrownWhenKeyDoesNotExist
  RuntimeException
