(require rackunit) (require rackunit/text-ui) (require "all-srfi-40-tests.ss") (run-tests all-srfi-40-tests)