From 936d1bcec73ea28d179d73b8206bbe304e5cd36e Mon Sep 17 00:00:00 2001
From: "Paul R. Tagliamonte" <paultag@debian.org>
Date: Thu, 4 Apr 2013 21:58:26 -0400
Subject: [PATCH] testing nested things

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

diff --git a/tests/native_tests/language.hy b/tests/native_tests/language.hy
index 153f548..65b66ba 100644
--- a/tests/native_tests/language.hy
+++ b/tests/native_tests/language.hy
@@ -281,3 +281,8 @@
       (+ x 42)  ; noop
       (+ x 1)))
   (assert (= 43 (my-fun 42))))
+
+
+(defn test-mangles []
+  "NATIVE: test mangles"
+  (assert (= 2 ((fn [] (+ 1 1))))))