1 2 3 4 5 6 7 8 9
(define-module (hnh util assert) :use-module (rnrs base) :export (assert*) ) (define-syntax assert* (syntax-rules () ((_ assertion) (assert assertion))))