adding in a cond macro test.

2013-03-09 00:18:32 -05:00 · 2013-03-09 00:18:32 -05:00 · 5bdebdf5fc
commit 5bdebdf5fc
parent ab2cf5beda
1 changed files with 7 additions and 0 deletions
--- a/tests/native_tests/language.hy
+++ b/tests/native_tests/language.hy
@ -50,3 +50,10 @@
      (assert (= 1 1))
      (assert (= 1 1))
      (assert (= 1 1)))))
+
+
+(defn test_cond []
+  "NATIVE: test if cond sorta works."
+  (cond
+    (= 1 2) (assert (= true false))
+    (is null null) (assert (= true true))))