Artifact
88cc387e8a7f4249eda075028a8f864d9fc8eb05:
;; Copyright (c) 2009 Derick Eddington. All rights reserved.
;; Licensed under an MIT-style license. My license is in the file
;; named LICENSE from the original collection this file is distributed
;; with. If this file is redistributed with some other collection, my
;; license must also be included.
#!r6rs
(library (srfi s78 lightweight-testing)
(export
check
check-ec
check-report
check-set-mode!
check-reset!
check-passed?)
(import
(rnrs)
(srfi s78 lightweight-testing compat)
(srfi s39 parameters)
(srfi private include)
(srfi s23 error tricks)
(srfi s42 eager-comprehensions))
;; (SRFI-23-error->R6RS "(library (srfi s78 lightweight-testing))"
;; (include/resolve ("srfi" "%3a78") "check.scm"))
(SRFI-23-error->R6RS "(library (srfi s78 lightweight-testing))"
(include/resolve ("srfi" "s78") "check.scm"))
)