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

Add a native macros test

Browse Source
This commit is contained in:
Nicolas Dandrimont 2013-05-11 19:40:48 +02:00
parent 4ffe20e853
commit 0bbce2a819
2 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
tests/__init__.py
View File

@ -4,6 +4,7 @@
import hy # noqa import hy # noqa
from .native_tests.defclass import * # noqa from .native_tests.defclass import * # noqa
from .native_tests.math import * # noqa from .native_tests.math import * # noqa
from .native_tests.native_macros import *
from .native_tests.quote import * # noqa from .native_tests.quote import * # noqa
from .native_tests.language import * # noqa from .native_tests.language import * # noqa
from .native_tests.unless import * # noqa from .native_tests.unless import * # noqa

10
tests/native_tests/native_macros.hy Normal file
View File

@ -0,0 +1,10 @@
(defn test-rev-macro []
"NATIVE: test stararged native macros"
(defmacro rev [&rest body]
"Execute the `body` statements in reverse"
(+ (quote (do)) (list (reversed body))))
(setv x [])
(rev (.append x 1) (.append x 2) (.append x 3))
(assert (= x [3 2 1])))