Not really making progress.
This commit is contained in:
parent
02fe5669d8
commit
e7dffcad2c
6 changed files with 66 additions and 19 deletions
6
lisp/not-working-yet.lisp
Normal file
6
lisp/not-working-yet.lisp
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
(set! or (lambda values
|
||||
"True if any of `values` are non-nil."
|
||||
(cond
|
||||
((nil? values) nil)
|
||||
((car values) t)
|
||||
(t (eval (cons 'or (cdr values)))))))
|
||||
Loading…
Add table
Add a link
Reference in a new issue