43 lines
1.0 KiB
Racket
43 lines
1.0 KiB
Racket
#lang scheme/base
|
|
(require rackunit
|
|
rackunit/gui)
|
|
(require macro-debugger/model/debug
|
|
"gentest-framework.ss"
|
|
"gentests.ss"
|
|
"test-setup.ss"
|
|
"tests/syntax-basic.ss"
|
|
"tests/syntax-macros.ss"
|
|
"tests/syntax-modules.ss"
|
|
"tests/syntax-errors.ss"
|
|
"tests/hiding.ss"
|
|
"tests/regression.ss"
|
|
"tests/policy.ss"
|
|
"tests/collects.ss")
|
|
(provide go)
|
|
|
|
(define (go) (test/gui all-tests))
|
|
(define (collects) (test/gui big-libs-tests))
|
|
|
|
(define protos
|
|
(list proto:kernel-forms
|
|
proto:kernel-contexts
|
|
proto:macros
|
|
proto:modules
|
|
proto:errors))
|
|
|
|
(define deriv-test (mk-deriv-test protos))
|
|
(define steps-test (mk-steps-test protos))
|
|
(define hiding-deriv-test (mk-hidden-deriv-test protos))
|
|
(define hiding-steps-test (mk-hidden-steps-test protos))
|
|
|
|
(define all-tests
|
|
(test-suite "All tests"
|
|
deriv-test
|
|
steps-test
|
|
hiding-deriv-test
|
|
hiding-steps-test
|
|
specialized-hiding-tests
|
|
regression-tests
|
|
#;seek-tests
|
|
policy-tests))
|