diff options
| -rw-r--r-- | lambda-tools.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lambda-tools.lisp b/lambda-tools.lisp index 9675c0a..ef999f1 100644 --- a/lambda-tools.lisp +++ b/lambda-tools.lisp @@ -16,7 +16,7 @@ PREDICATES have side effects, they will be executed only if each of the preceding predicates in the list returned NIL." (labels ((disj (x preds) (if (null preds) nil - (or (function pred x) + (or (funcall (car preds) x) (disj x (cdr preds)))))) (lambda (x) (disj x predicates)))) |