(module run-tests mzscheme (require (planet "test.ss" ("schematics" "schemeunit.plt" 2 8)) (planet "graphical-ui.ss" ("schematics" "schemeunit.plt" 2 8)) (file "test-language.ss") (file "test-teachpacks.ss")) (test/graphical-ui (test-suite "Dracula" test-language test-teachpacks)) )