(use test)

(unless (zero? (test-failure-count)) (exit 1))