diff options
Diffstat (limited to 'macros.lisp')
-rw-r--r-- | macros.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/macros.lisp b/macros.lisp index de2dfbf..8157959 100644 --- a/macros.lisp +++ b/macros.lisp @@ -91,7 +91,7 @@ those numbers. -(defmacro and> (&rest preds) +(defmacro conj (&rest preds) (let ((block-label (gensym))) `(let ((preds (list ,@preds))) (lambda (arg) @@ -103,7 +103,7 @@ those numbers. (unless acc (return-from ,block-label nil))) acc)))))) -(defmacro or> (&rest preds) +(defmacro disj (&rest preds) (let ((block-label (gensym))) `(let ((preds (list ,@preds))) (lambda (arg) |