diff options
| author | Colin Okay <cbeok@protonmail.com> | 2020-08-11 09:27:01 -0500 |
|---|---|---|
| committer | Colin Okay <cbeok@protonmail.com> | 2020-08-11 09:27:01 -0500 |
| commit | 6f7197cccbc81924f314d63b6be5fe166f0c98cf (patch) | |
| tree | 0584a4adc2cdff48001c82683e2eefb114a6f1c3 /lambda-tools.lisp | |
| parent | 40b8619e8ece8905d3954f1892940f43ec3e7163 (diff) | |
added positional arguments to $$
Diffstat (limited to 'lambda-tools.lisp')
| -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 ef999f1..ecad381 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 (funcall (car preds) x) + (or (funcall (car preds) x) (disj x (cdr preds)))))) (lambda (x) (disj x predicates)))) |