From 5bdebdf5fcccadcd9e736238eefd272a882770eb Mon Sep 17 00:00:00 2001
From: "Paul R. Tagliamonte" <paultag@debian.org>
Date: Sat, 9 Mar 2013 00:18:32 -0500
Subject: [PATCH] adding in a cond macro test.

---
 tests/native_tests/language.hy | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/tests/native_tests/language.hy b/tests/native_tests/language.hy
index 3c59757..a05cd92 100644
--- 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))))