#lang scheme/base (require (planet schematics/schemeunit:3) (planet schematics/schemeunit:3/text-ui) "all-benchmark-tests.ss") (print-struct #t) (run-tests all-benchmark-tests)