diff options
| author | Joel Martin <github@martintribe.org> | 2015-02-15 20:46:19 -0600 |
|---|---|---|
| committer | Joel Martin <github@martintribe.org> | 2015-02-15 20:46:19 -0600 |
| commit | 1981bf5766d9bb75a652cc781b817cc3150d12ef (patch) | |
| tree | b6663351e6290a05b048de1878ccd5a42db54333 /miniMAL/types.json | |
| parent | 9d8f02993276fe9b77f7c21099d1b9f1602d195c (diff) | |
| download | mal-1981bf5766d9bb75a652cc781b817cc3150d12ef.tar.gz mal-1981bf5766d9bb75a652cc781b817cc3150d12ef.zip | |
miniMAL: step7
Diffstat (limited to 'miniMAL/types.json')
| -rw-r--r-- | miniMAL/types.json | 4 |
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"], |
