module/hnh/util/assert.scm


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