From 7c07d6e6ececbf73e18a639e00b3690d4827e12a Mon Sep 17 00:00:00 2001
From: dozens
Date: Wed, 29 May 2024 19:26:41 -0600
Subject: tests

---
 lib/keys.test.fnl | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 lib/keys.test.fnl

(limited to 'lib/keys.test.fnl')

diff --git a/lib/keys.test.fnl b/lib/keys.test.fnl
new file mode 100644
index 0000000..413a773
--- /dev/null
+++ b/lib/keys.test.fnl
@@ -0,0 +1,13 @@
+(let [{: keys} (require :lib.keys)
+      {: describe :end test-end} (require :lib.test)]
+  (describe "keys()" (fn [t]
+                       (let [input {:apple :red :banana :yellow}
+                             actual (keys input)
+                             sorted (table.sort actual) ;; SIDE EFFECT!!
+                             ]
+                         (t {:given "a table"
+                             :should "returns a list of keys"
+                             :expected [:apple :banana]
+                             : actual})
+                         (test-end)))))
+
-- 
cgit 1.4.1-2-gfad0