From 6f0e739b31b0f0bfb0d8883dbae1e7842c2c0781 Mon Sep 17 00:00:00 2001 From: "Paul R. Tagliamonte" Date: Tue, 9 Apr 2013 21:45:37 -0400 Subject: [PATCH] test hoisted functions too --- tests/native_tests/language.hy | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/tests/native_tests/language.hy b/tests/native_tests/language.hy index 4a62524..f6a6f83 100644 --- a/tests/native_tests/language.hy +++ b/tests/native_tests/language.hy @@ -520,7 +520,8 @@ (assert (= 4 (eval (quote (+ x 2))))) (setf test-payload (quote (+ x 2))) (setf x 4) - (assert (= 6 (eval test-payload)))) + (assert (= 6 (eval test-payload))) + (assert (= 6 (eval (quote ((fn [] (+ 3 3))))))))