(define-library (csc assert)
  (export assert)
  (import (scheme base))
  (begin


    (define-syntax assert
      (syntax-rules ()
        ((assert condition)
          (unless condition
            (error "assertion failed" 'condition)))))))