28 lines
656 B
Scheme
28 lines
656 B
Scheme
#lang scheme/base
|
|
(require (planet "test.ss" ("schematics" "schemeunit.plt" 2))
|
|
"request-test.ss"
|
|
"cache-table-test.ss"
|
|
"response-test.ss"
|
|
"connection-manager-test.ss"
|
|
"define-closure-test.ss"
|
|
"session-test.ss"
|
|
"mime-types-test.ss"
|
|
"url-param-test.ss"
|
|
"mod-map-test.ss"
|
|
"util-test.ss")
|
|
(provide all-private-tests)
|
|
|
|
(define all-private-tests
|
|
(test-suite
|
|
"Internal"
|
|
cache-table-tests
|
|
connection-manager-tests
|
|
define-closure-tests
|
|
mime-types-tests
|
|
mod-map-tests
|
|
request-tests
|
|
response-tests
|
|
session-tests
|
|
url-param-tests
|
|
util-tests))
|