From 1981bf5766d9bb75a652cc781b817cc3150d12ef Mon Sep 17 00:00:00 2001
From: Joel Martin <github@martintribe.org>
Date: Sun, 15 Feb 2015 20:46:19 -0600
Subject: miniMAL: step7

---
 miniMAL/types.json | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'miniMAL/types.json')

diff --git a/miniMAL/types.json b/miniMAL/types.json
index 2e85775..2af650d 100644
--- a/miniMAL/types.json
+++ b/miniMAL/types.json
@@ -14,7 +14,9 @@
     ["if", ["list?", "b"],
       ["_cmp_seqs", "a", "b"],
       false],
-    ["=", "a", "b"]]]],
+  ["if", ["symbol?", "a"],
+    ["=", ["get", "a", ["`", "val"]], ["get", "b", ["`", "val"]]],
+    ["=", "a", "b"]]]]],
 
 ["def", "symbol", ["fn", ["name"],
   ["hash-map", ["`", "type"], ["`", "Symbol"],
-- 
cgit v1.2.3