(import scheme)
(import test)
(import (srfi 145))

(test 123 (assume 123 "True values return the object unchanged"))
(test-error (assume #f "False ones raise an error"))

(test-exit)