aboutsummaryrefslogtreecommitdiff
path: root/tests/lisp/macro.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'tests/lisp/macro.lisp')
-rw-r--r--tests/lisp/macro.lisp10
1 files changed, 0 insertions, 10 deletions
diff --git a/tests/lisp/macro.lisp b/tests/lisp/macro.lisp
deleted file mode 100644
index 4564cb9..0000000
--- a/tests/lisp/macro.lisp
+++ /dev/null
@@ -1,10 +0,0 @@
-(defmacro for (start pred inc . body)
- `(let (,start)
- (while ,pred
- ,@body
- ,inc)))
-(assert (= 10
- (let ((sum 0))
- (for (i 0) (< i 5) (incq i)
- (setq sum (+ sum i)))
- sum)))