(module drive-tests mzscheme (require "test-hash-cons.ss" (planet "test.ss" ("schematics" "schemeunit.plt" 2 8)) (planet "text-ui.ss" ("schematics" "schemeunit.plt" 2 8))) (test/text-ui (test-suite "all tests" hash-cons-tests)))