suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Renaming files

Browse Source 
svn: r6299
This commit is contained in:
Jay McCarthy 2007-05-25 16:10:17 +00:00
parent 7b8c66f130
commit ec053fad62
6 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/web-server/prototype-web-server/tests/test-normalizer.ss → collects/web-server/prototype-web-server/tests/anormal-test.ss
View File

@ -1,7 +1,7 @@
(module test-normalizer mzscheme (module anormal-test mzscheme
(require (planet "test.ss" ("schematics" "schemeunit.plt" 1 1)) (require (planet "test.ss" ("schematics" "schemeunit.plt" 1 1))
"../lang/anormal.ss") "../lang/anormal.ss")
(provide test-normalizer-suite) (provide anormal-tests)
(define (empty-env var) (define (empty-env var)
(error "empty environment")) (error "empty environment"))
@ -134,7 +134,7 @@
;; ************************************************** ;; **************************************************
;; ACTUAL TESTS ;; ACTUAL TESTS
(define test-normalizer-suite (define anormal-tests
(make-test-suite (make-test-suite
"Tests for Normalization Phase" "Tests for Normalization Phase"
(make-test-suite (make-test-suite

2
collects/web-server/prototype-web-server/tests/certify-tests.ss
View File

@ -1,6 +1,6 @@
(module certify-tests mzscheme (module certify-tests mzscheme
(require (planet "test.ss" ("schematics" "schemeunit.plt" 1 1)) (require (planet "test.ss" ("schematics" "schemeunit.plt" 1 1))
"language-tester.ss") "util.ss")
(provide certify-suite) (provide certify-suite)
(define the-dispatch (define the-dispatch

2
collects/web-server/prototype-web-server/tests/lang-tests.ss
View File

@ -1,6 +1,6 @@
(module lang-tests mzscheme (module lang-tests mzscheme
(require (planet "test.ss" ("schematics" "schemeunit.plt" 1 1)) (require (planet "test.ss" ("schematics" "schemeunit.plt" 1 1))
"language-tester.ss") "util.ss")
(provide lang-suite) (provide lang-suite)
(define (catch-unsafe-context-exn thunk) (define (catch-unsafe-context-exn thunk)

2
collects/web-server/prototype-web-server/tests/stuff-url-tests.ss
View File

@ -5,7 +5,7 @@
(lib "url.ss" "net") (lib "url.ss" "net")
(lib "dirs.ss" "setup") (lib "dirs.ss" "setup")
(lib "file.ss") (lib "file.ss")
"language-tester.ss") "util.ss")
(require/expose (lib "stuff-url.ss" "web-server" "prototype-web-server") (require/expose (lib "stuff-url.ss" "web-server" "prototype-web-server")
(same-module? url-parts recover-serial)) (same-module? url-parts recover-serial))

4
collects/web-server/prototype-web-server/tests/suite.ss
View File

@ -3,7 +3,7 @@
(planet "text-ui.ss" ("schematics" "schemeunit.plt" 1)) (planet "text-ui.ss" ("schematics" "schemeunit.plt" 1))
(planet "test.ss" ("schematics" "schemeunit.plt" 1 1)) (planet "test.ss" ("schematics" "schemeunit.plt" 1 1))
"persistent-close-tests.ss" "persistent-close-tests.ss"
"test-normalizer.ss" "anormal-test.ss"
"closure-tests.ss" "closure-tests.ss"
"labels-tests.ss" "labels-tests.ss"
"lang-tests.ss" "lang-tests.ss"
@ -15,7 +15,7 @@
"Main Tests for Prototype Web Server" "Main Tests for Prototype Web Server"
persistent-close-suite persistent-close-suite
stuff-url-suite stuff-url-suite
test-normalizer-suite anormal-tests
closure-tests-suite closure-tests-suite
labels-tests-suite labels-tests-suite
lang-suite lang-suite

2
collects/web-server/prototype-web-server/tests/language-tester.ss → collects/web-server/prototype-web-server/tests/util.ss
View File

@ -1,4 +1,4 @@
(module language-tester mzscheme (module util mzscheme
(provide make-module-eval (provide make-module-eval
make-eval/mod-path) make-eval/mod-path)