summaryrefslogtreecommitdiffstats
path: root/tests/011/macros-2.txr
diff options
context:
space:
mode:
Diffstat (limited to 'tests/011/macros-2.txr')
-rw-r--r--tests/011/macros-2.txr2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/011/macros-2.txr b/tests/011/macros-2.txr
index 0d63a13b..be385c6f 100644
--- a/tests/011/macros-2.txr
+++ b/tests/011/macros-2.txr
@@ -2,7 +2,7 @@
(defmacro while ((condition : result) . body)
(let ((cblk (gensym "cnt-blk-"))
(bblk (gensym "brk-blk-")))
- '(macrolet ((break (value) '(return-from ,',bblk ,value)))
+ ^(macrolet ((break (value) ^(return-from ,',bblk ,value)))
(symacrolet ((break (return-from ,bblk))
(continue (return-from ,cblk)))
(block ,bblk