dd9f3b7

test.lua modified (view file)

@@ -154,6 +154,11 @@  teq(read_eval("(let [x ()] x)"), list()) +teq(read_eval("(let [x []] x)"), {})+teq(read_eval("(let [x {}] x)"), {})+teq(read_eval("(let [x {:a 1 :b 2}] x)"), {a = 1, b = 2})+teq(read_eval("(let [x [:a :b :c]] x)"), {"a", "b", "c"})+ -- Later -- teq(read_eval("(let [x 1 y 2] [x y])"), {1, 2}) teq(read_eval("((fn [x] x) :abc)"), "abc")