summaryrefslogtreecommitdiff
path: root/tests/core.fnl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/core.fnl')
-rw-r--r--tests/core.fnl5
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/core.fnl b/tests/core.fnl
index fb532d3..bac93dd 100644
--- a/tests/core.fnl
+++ b/tests/core.fnl
@@ -445,9 +445,10 @@
(assert-eq (keys {:a 1}) [:a])
(assert-eq (vals {:a 1}) [1])
(match (pcall #(assert-eq (keys {:a 1 :b 2 :c 3}) (hash-set :a :b :c)))
- (false msg) (io.stderr:write (.. "WARNING: " msg)))
+ (false msg) (io.stderr:write "WARNING: " msg))
+ (print "10")
(match (pcall #(assert-eq (vals {:a 1 :b 2 :c 3}) (hash-set 1 2 3)))
- (false msg) (io.stderr:write (.. "WARNING: " msg)))
+ (false msg) (io.stderr:write "WARNING: " msg))
(assert-eq (find {:a 1 :b 2 :c 3} :c) [:c 3])
(assert-eq (find {:a 1 :b 2 :c 3} :d) nil)))