mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 13:49:17 +02:00
10 lines
198 B
Scheme
10 lines
198 B
Scheme
|
|
(define-syntax when
|
|
(syntax-rules ()
|
|
((when test . body)
|
|
(if test (begin . body)))))
|
|
|
|
(define-syntax unless
|
|
(syntax-rules ()
|
|
((unless test . body)
|
|
(when (not test) . body))))
|