Ensure assoc updates maps properly

[jackhill/mal.git] / miniMAL / types.json

diff --git a/miniMAL/types.json b/miniMAL/types.json
index 400f75a..a9a0d7f 100644 (file)
--- a/miniMAL/types.json
+++ b/miniMAL/types.json
@@ -33,8 +33,10 @@
       ["_cmp_hash_maps", "a", "b"],
       false],
   ["if", ["symbol?", "a"],
-    ["=", ["get", "a", ["`", "val"]], ["get", "b", ["`", "val"]]],
-    ["=", "a", "b"]]]]]],
+    ["if", ["symbol?", "b"],
+      ["=", ["get", "a", ["`", "val"]], ["get", "b", ["`", "val"]]],
+      false],
+  ["=", "a", "b"]]]]]],
 
 ["def", "_clone", ["fn", ["obj"],
   ["if", ["list?", "obj"],