More tests

hylang · Jun 7, 2013 · 2674016 · 2674016
1 parent 6eacf63
commit 2674016
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/tests/native_tests/native_macros.hy b/tests/native_tests/native_macros.hy
@@ -54,3 +54,10 @@
 (assert (= phase "load"))
 (assert (= (phase-when-compiling) "compile"))
 
+(setv initialized False)
+(eval-and-compile
+ (setv initialized True))
+(defmacro test-initialized [] initialized)
+(assert initialized)
+(assert (test-initialized))
+