diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2014-07-10 07:43:19 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2014-07-10 07:43:19 -0700 |
| commit | 955dec17ec449be79ac85b2c9e2e4fb825e612f3 (patch) | |
| tree | b355b213e1474e17e5bc2069e147c2cf89fcb149 /tests/011/macros-2.txr | |
| parent | 157145753623fde988c5b4664168a0cbd6282503 (diff) | |
| download | txr-955dec17ec449be79ac85b2c9e2e4fb825e612f3.tar.gz txr-955dec17ec449be79ac85b2c9e2e4fb825e612f3.tar.bz2 txr-955dec17ec449be79ac85b2c9e2e4fb825e612f3.zip | |
* tests/011/macros-2.txr: Added test for labels shadowing macro,
and let shadowing symacro.
* tests/011/macros-2.expected: Regenerated
* txr.vim: Regenerated.
Diffstat (limited to 'tests/011/macros-2.txr')
| -rw-r--r-- | tests/011/macros-2.txr | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/tests/011/macros-2.txr b/tests/011/macros-2.txr index be385c6f..12f957df 100644 --- a/tests/011/macros-2.txr +++ b/tests/011/macros-2.txr @@ -24,4 +24,11 @@ continue) (if (> i 30) break) - (prinl i))))) + (prinl i)))) + + (let ((i 0)) + (while ((< i 5)) + (inc i) + (labels ((while () 'while)) + (let ((break 'break)) + (prinl (list (while) break))))))) |