Not really making progress.

This commit is contained in:
Simon Brooke 2018-12-30 19:07:07 +00:00
parent 02fe5669d8
commit e7dffcad2c
6 changed files with 66 additions and 19 deletions

View 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)))))))