Yaltik/hy
2
0
Fork 0
Code Pull Requests Releases Activity

Added a simple test for macroexpand

Browse Source
This commit is contained in:
Sean B. Palmer 2013-10-11 12:03:52 +01:00
parent a34db9119b
commit 2e60d6b47b
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tests/native_tests/language.hy
View File

@ -775,7 +775,13 @@
(.append y x)) (.append y x))
(assert (= y [5]))) (assert (= y [5])))
(defn test-empty-list [] (defn test-empty-list []
"Evaluate an empty list to a []" "Evaluate an empty list to a []"
(assert (= () []))) (assert (= () [])))
(defn test-macroexpand []
"Test macroexpand on ->"
(assert (= (macroexpand '(-> (a b) (x y)))
'(x (a b) y))))