#lang racket
(define-syntax unless
(syntax-rules ()
[(_ tst body ...)
(if (not tst) (begin body ...) (void))]))
(let ([not (λ (v) v)])
(unless false (println 1) (println 2)))
#lang racket
(define-syntax unless
(syntax-rules ()
[(_ tst body ...)
(if (not tst) (begin body ...) (void))]))
(let ([not (λ (v) v)])
(unless false (println 1) (println 2)))