diff options
Diffstat (limited to 'tests/lisp/macro.lisp')
| -rw-r--r-- | tests/lisp/macro.lisp | 10 |
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))) |
