aboutsummaryrefslogtreecommitdiff
path: root/miniMAL/types.json
diff options
context:
space:
mode:
authorJoel Martin <github@martintribe.org>2015-02-15 20:46:19 -0600
committerJoel Martin <github@martintribe.org>2015-02-15 20:46:19 -0600
commit1981bf5766d9bb75a652cc781b817cc3150d12ef (patch)
treeb6663351e6290a05b048de1878ccd5a42db54333 /miniMAL/types.json
parent9d8f02993276fe9b77f7c21099d1b9f1602d195c (diff)
downloadmal-1981bf5766d9bb75a652cc781b817cc3150d12ef.tar.gz
mal-1981bf5766d9bb75a652cc781b817cc3150d12ef.zip
miniMAL: step7
Diffstat (limited to 'miniMAL/types.json')
-rw-r--r--miniMAL/types.json4
1 files changed, 3 insertions, 1 deletions
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"],