move tests/mzscheme to tests/racket
This commit is contained in:
Matthew Flatt
parent
28b4043077
commit
882b7dce0e
|
|
@ -1338,228 +1338,228 @@ path/s is either such a string or a list of them.
|
||||||
"collects/tests/mysterx/dhtmltests.rkt" drdr:command-line ""
|
"collects/tests/mysterx/dhtmltests.rkt" drdr:command-line ""
|
||||||
"collects/tests/mysterx/mystests.rkt" drdr:command-line ""
|
"collects/tests/mysterx/mystests.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzcom/test.rkt" drdr:command-line ""
|
"collects/tests/mzcom/test.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme" responsible (mflatt)
|
"collects/tests/racket" responsible (mflatt)
|
||||||
"collects/tests/mzscheme/advanced.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/advanced.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/all.rkt" drdr:command-line ""
|
"collects/tests/racket/all.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/async-channel.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/async-channel.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/awk.rkt" drdr:command-line ""
|
"collects/tests/racket/awk.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/basic.rkt" drdr:command-line ""
|
"collects/tests/racket/basic.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/beg-adv.rkt" drdr:command-line ""
|
"collects/tests/racket/beg-adv.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/beg-bega.rkt" drdr:command-line ""
|
"collects/tests/racket/beg-bega.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/beg-intm.rkt" drdr:command-line ""
|
"collects/tests/racket/beg-intm.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/beg-intml.rkt" drdr:command-line ""
|
"collects/tests/racket/beg-intml.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/bega-adv.rkt" drdr:command-line ""
|
"collects/tests/racket/bega-adv.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/beginner-abbr.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/beginner-abbr.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/beginner.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/beginner.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/auto.rkt" drdr:command-line "mzscheme ~s -- mzscheme ctak"
|
"collects/tests/racket/benchmarks/common/auto.rkt" drdr:command-line "racket ~s -- racket ctak"
|
||||||
"collects/tests/mzscheme/benchmarks/common/conform.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/conform.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/ctak.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/ctak.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/destruct.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/destruct.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/div.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/div.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/dynamic.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/dynamic.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/dynamic2.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/dynamic2.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/graphs.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/graphs.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/lattice.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/lattice.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/maze.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/maze.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/maze2.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/maze2.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/mazefun.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/mazefun.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/mk-bigloo.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/mk-bigloo.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/mk-chicken.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/mk-chicken.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/mk-gambit.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/mk-gambit.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/nestedloop.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/nestedloop.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/nqueens.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/nqueens.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/paraffins.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/paraffins.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/peval.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/peval.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/r5rs-wrap.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/benchmarks/common/r5rs-wrap.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/scheme.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/scheme.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/scheme2.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/scheme2.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/sort1.rkt" drdr:command-line ""
|
"collects/tests/racket/benchmarks/common/sort1.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/benchmarks/common/tak.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/tak.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/takl.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/takl.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/takr.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/takr.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/common/takr2.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/common/takr2.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/mz/expand-class.scm" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/benchmarks/mz/expand-class.scm" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/mz/parsing.scm" drdr:command-line "mred -f ~s"
|
"collects/tests/racket/benchmarks/mz/parsing.scm" drdr:command-line "mred -f ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/mz/redsem.scm" drdr:command-line "mzscheme -f ~s -- --skip-struct-test"
|
"collects/tests/racket/benchmarks/mz/redsem.scm" drdr:command-line "racket -f ~s -- --skip-struct-test"
|
||||||
"collects/tests/mzscheme/benchmarks/mz/ssax.scm" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/benchmarks/mz/ssax.scm" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/rx/auto.rkt" drdr:command-line "mzscheme -qt ~s -- mzscheme simple" drdr:timeout 600
|
"collects/tests/racket/benchmarks/rx/auto.rkt" drdr:command-line "racket -qt ~s -- racket simple" drdr:timeout 600
|
||||||
"collects/tests/mzscheme/benchmarks/rx/pcre.rkt" drdr:command-line "mzscheme ~s \"mz\"\"scheme\""
|
"collects/tests/racket/benchmarks/rx/pcre.rkt" drdr:command-line "racket ~s \"mz\"\"scheme\""
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/ackermann.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/ackermann.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/binarytrees.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/binarytrees.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/chameneos.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/chameneos.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/cheapconcurrency.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/cheapconcurrency.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/fannkuch.rkt" drdr:command-line "mzscheme -t ~s -- 4"
|
"collects/tests/racket/benchmarks/shootout/fannkuch.rkt" drdr:command-line "racket -t ~s -- 4"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/fasta.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/fasta.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/hash.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/hash.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/hash2.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/hash2.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/mandelbrot-generic.rkt" drdr:command-line "mzscheme -t ~s -- 15"
|
"collects/tests/racket/benchmarks/shootout/mandelbrot-generic.rkt" drdr:command-line "racket -t ~s -- 15"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/mandelbrot-unsafe.rkt" drdr:command-line "mzscheme ~s 3"
|
"collects/tests/racket/benchmarks/shootout/mandelbrot-unsafe.rkt" drdr:command-line "racket ~s 3"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/mandelbrot.rkt" drdr:command-line "mzscheme -t ~s -- 15"
|
"collects/tests/racket/benchmarks/shootout/mandelbrot.rkt" drdr:command-line "racket -t ~s -- 15"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/meteor.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/meteor.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/nbody-generic.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/nbody-generic.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/nbody-vec-generic.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/nbody-vec-generic.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/nbody-vec-unsafe.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/nbody-vec-unsafe.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/nbody-vec.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/nbody-vec.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/nbody.rkt" drdr:command-line "mzscheme -t ~s -- 10"
|
"collects/tests/racket/benchmarks/shootout/nbody.rkt" drdr:command-line "racket -t ~s -- 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/nestedloop.rkt" drdr:command-line "mzscheme -t ~s -- 2"
|
"collects/tests/racket/benchmarks/shootout/nestedloop.rkt" drdr:command-line "racket -t ~s -- 2"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/nsieve.rkt" drdr:command-line "mzscheme -t ~s -- 2"
|
"collects/tests/racket/benchmarks/shootout/nsieve.rkt" drdr:command-line "racket -t ~s -- 2"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/nsievebits.rkt" drdr:command-line "mzscheme -t ~s -- 2"
|
"collects/tests/racket/benchmarks/shootout/nsievebits.rkt" drdr:command-line "racket -t ~s -- 2"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/partialsums.rkt" drdr:command-line "mzscheme -t ~s -- 25"
|
"collects/tests/racket/benchmarks/shootout/partialsums.rkt" drdr:command-line "racket -t ~s -- 25"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/pidigits-gmp.rkt" drdr:command-line "mzscheme ~s 10"
|
"collects/tests/racket/benchmarks/shootout/pidigits-gmp.rkt" drdr:command-line "racket ~s 10"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/pidigits.rkt" drdr:command-line "mzscheme -t ~s -- 25"
|
"collects/tests/racket/benchmarks/shootout/pidigits.rkt" drdr:command-line "racket -t ~s -- 25"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/random.rkt" drdr:command-line "mzscheme -t ~s -- 25"
|
"collects/tests/racket/benchmarks/shootout/random.rkt" drdr:command-line "racket -t ~s -- 25"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/recursive.rkt" drdr:command-line "mzscheme -t ~s -- 2"
|
"collects/tests/racket/benchmarks/shootout/recursive.rkt" drdr:command-line "racket -t ~s -- 2"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/run.rkt" drdr:command-line "mzscheme -t ~s -- nsieve.rkt 1"
|
"collects/tests/racket/benchmarks/shootout/run.rkt" drdr:command-line "racket -t ~s -- nsieve.rkt 1"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/spectralnorm-generic.rkt" drdr:command-line "mzscheme -t ~s -- 25"
|
"collects/tests/racket/benchmarks/shootout/spectralnorm-generic.rkt" drdr:command-line "racket -t ~s -- 25"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/spectralnorm-unsafe.rkt" drdr:command-line "mzscheme ~s 5"
|
"collects/tests/racket/benchmarks/shootout/spectralnorm-unsafe.rkt" drdr:command-line "racket ~s 5"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/spectralnorm.rkt" drdr:command-line "mzscheme -t ~s -- 25"
|
"collects/tests/racket/benchmarks/shootout/spectralnorm.rkt" drdr:command-line "racket -t ~s -- 25"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/spellcheck.rkt" drdr:command-line "mzc ~s"
|
"collects/tests/racket/benchmarks/shootout/spellcheck.rkt" drdr:command-line "mzc ~s"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/strcat.rkt" drdr:command-line "mzscheme -t ~s -- 25"
|
"collects/tests/racket/benchmarks/shootout/strcat.rkt" drdr:command-line "racket -t ~s -- 25"
|
||||||
"collects/tests/mzscheme/benchmarks/shootout/thread-ring.rkt" drdr:command-line "mzscheme -t ~s -- 25"
|
"collects/tests/racket/benchmarks/shootout/thread-ring.rkt" drdr:command-line "racket -t ~s -- 25"
|
||||||
"collects/tests/mzscheme/binc.rkt" drdr:command-line ""
|
"collects/tests/racket/binc.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/boundmap-test.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/boundmap-test.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/cache-image-snip-test.rkt" drdr:command-line "mred -f ~s"
|
"collects/tests/racket/cache-image-snip-test.rkt" drdr:command-line "mred -f ~s"
|
||||||
"collects/tests/mzscheme/censor.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/censor.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/chaperone.rkt" drdr:command-line ""
|
"collects/tests/racket/chaperone.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/char-set.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/char-set.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/chez-module.rkt" drdr:command-line ""
|
"collects/tests/racket/chez-module.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/cm.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/cm.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/cmdline.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/cmdline.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/compat.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/compat.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/compile.rkt" drdr:command-line ""
|
"collects/tests/racket/compile.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/contmark.rkt" drdr:command-line ""
|
"collects/tests/racket/contmark.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/contract-mzlib-test.rkt" drdr:command-line ""
|
"collects/tests/racket/contract-mzlib-test.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/contract-opt-tests.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/contract-opt-tests.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/contract-test.rkt" responsible (robby) drdr:command-line ""
|
"collects/tests/racket/contract-test.rkt" responsible (robby) drdr:command-line ""
|
||||||
"collects/tests/mzscheme/control.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/control.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/date.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/date.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/deep.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/deep.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/dict.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/dict.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/embed-in-c.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/embed-in-c.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/embed-me4.rkt" drdr:command-line ""
|
"collects/tests/racket/embed-me4.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/embed-me5.rkt" drdr:command-line "mred-text -t ~s"
|
"collects/tests/racket/embed-me5.rkt" drdr:command-line "mred-text -t ~s"
|
||||||
"collects/tests/mzscheme/embed-me7.rkt" drdr:command-line "mred-text -t ~s"
|
"collects/tests/racket/embed-me7.rkt" drdr:command-line "mred-text -t ~s"
|
||||||
"collects/tests/mzscheme/embed-me9.rkt" drdr:command-line ""
|
"collects/tests/racket/embed-me9.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/embed.rkt" drdr:command-line ""
|
"collects/tests/racket/embed.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/etc.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/etc.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/expand.rkt" drdr:command-line ""
|
"collects/tests/racket/expand.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/fact.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/fact.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/file.rkt" drdr:command-line ""
|
"collects/tests/racket/file.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/filelib.rkt" drdr:command-line "" drdr:timeout 360
|
"collects/tests/racket/filelib.rkt" drdr:command-line "" drdr:timeout 360
|
||||||
"collects/tests/mzscheme/fixnum.rkt" drdr:command-line "mzscheme -f ~s" drdr:timeout 360
|
"collects/tests/racket/fixnum.rkt" drdr:command-line "racket -f ~s" drdr:timeout 360
|
||||||
"collects/tests/mzscheme/for.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/for.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/foreign-test.c" responsible (eli)
|
"collects/tests/racket/foreign-test.c" responsible (eli)
|
||||||
"collects/tests/mzscheme/foreign-test.rkt" responsible (eli) drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/foreign-test.rkt" responsible (eli) drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/function.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/function.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/head.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/head.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/htdp-image.rkt" responsible (robby) drdr:command-line "mred -f ~s"
|
"collects/tests/racket/htdp-image.rkt" responsible (robby) drdr:command-line "mred -f ~s"
|
||||||
"collects/tests/mzscheme/htdp-test.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/htdp-test.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/htdp.rkt" drdr:command-line ""
|
"collects/tests/racket/htdp.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/id-table-test.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/id-table-test.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/imap.rkt" drdr:command-line ""
|
"collects/tests/racket/imap.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/intermediate-lambda.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/intermediate-lambda.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/intermediate.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/intermediate.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/intm-adv.rkt" drdr:command-line ""
|
"collects/tests/racket/intm-adv.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/intm-intml.rkt" drdr:command-line ""
|
"collects/tests/racket/intm-intml.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/intmlam-adv.rkt" drdr:command-line ""
|
"collects/tests/racket/intmlam-adv.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/ktest.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/ktest.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/kw.rkt" responsible (eli) drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/kw.rkt" responsible (eli) drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/list.rkt" drdr:command-line ""
|
"collects/tests/racket/list.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/loadable.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/loadable.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/loadtest.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/loadtest.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/logger.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/logger.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/loop.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/loop.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/ltest.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/ltest.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/macro.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/macro.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/macrolib.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/macrolib.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/makeflat.rkt" drdr:command-line ""
|
"collects/tests/racket/makeflat.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/makeflats.rkt" drdr:command-line ""
|
"collects/tests/racket/makeflats.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/math.rkt" drdr:command-line ""
|
"collects/tests/racket/math.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/moddep.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/moddep.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/modprot.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/modprot.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/module-reader.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/module-reader.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/module.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/module.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/mpair.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/mpair.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/mz-tests.rkt" drdr:command-line ""
|
"collects/tests/racket/mz-tests.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/mzlib-tests.rkt" drdr:command-line ""
|
"collects/tests/racket/mzlib-tests.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/mzq.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/mzq.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/name.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/name.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/namespac.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/namespac.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/nch.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/nch.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/net.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/net.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/number.rkt" drdr:command-line ""
|
"collects/tests/racket/number.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/numstrs.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/numstrs.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/object-old.rkt" drdr:command-line ""
|
"collects/tests/racket/object-old.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/object.rkt" drdr:command-line ""
|
"collects/tests/racket/object.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/oe.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/oe.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/openssl.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/openssl.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/optimize.rkt" drdr:command-line ""
|
"collects/tests/racket/optimize.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/pack.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/pack.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/package-gen.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/package-gen.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/package.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/package.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/parallel.rkt" drdr:command-line ""
|
"collects/tests/racket/parallel.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/param.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/param.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/path.rkt" drdr:command-line ""
|
"collects/tests/racket/path.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/pathlib.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/pathlib.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/pconvert.rkt" drdr:command-line ""
|
"collects/tests/racket/pconvert.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/place-channel.rkt" drdr:command-line ""
|
"collects/tests/racket/place-channel.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/port.rkt" drdr:command-line ""
|
"collects/tests/racket/port.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/portlib.rkt" drdr:command-line ""
|
"collects/tests/racket/portlib.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/pp-regression.rkt" drdr:command-line ""
|
"collects/tests/racket/pp-regression.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/pretty.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/pretty.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/procs.rkt" drdr:command-line ""
|
"collects/tests/racket/procs.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/prompt-tests.rkt" drdr:command-line ""
|
"collects/tests/racket/prompt-tests.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/prompt.rkt" drdr:command-line ""
|
"collects/tests/racket/prompt.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/quiet.rkt" drdr:command-line "mzscheme -f ~s" drdr:timeout 360
|
"collects/tests/racket/quiet.rkt" drdr:command-line "racket -f ~s" drdr:timeout 360
|
||||||
"collects/tests/mzscheme/read.rkt" drdr:command-line ""
|
"collects/tests/racket/read.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/readtable.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/readtable.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/restart.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/restart.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/runflats.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/runflats.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/rx.rkt" drdr:command-line ""
|
"collects/tests/racket/rx.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/sandbox.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/sandbox.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/scheme-tests.rkt" drdr:command-line ""
|
"collects/tests/racket/scheme-tests.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/serialize.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/serialize.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/set.rkt" drdr:command-line ""
|
"collects/tests/racket/set.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/shared-tests.rkt" drdr:command-line ""
|
"collects/tests/racket/shared-tests.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/shared.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/shared.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/srfi.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/srfi.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/stream.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/stream.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/string-mzlib.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/string-mzlib.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/string.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/string.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/struct.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/struct.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/structlib.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/structlib.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/stx.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/stx.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/subprocess.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/subprocess.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/sync.rkt" drdr:command-line ""
|
"collects/tests/racket/sync.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/syntax-tests.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/syntax-tests.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/syntax.rkt" drdr:command-line ""
|
"collects/tests/racket/syntax.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/tcp.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/tcp.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/testing.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/testing.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/thread.rkt" drdr:command-line ""
|
"collects/tests/racket/thread.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/threadlib.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/threadlib.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/thrport.rkt" drdr:command-line ""
|
"collects/tests/racket/thrport.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/trace.rkt" drdr:command-line ""
|
"collects/tests/racket/trace.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/trait.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/trait.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/ttt/listlib.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/ttt/listlib.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/ttt/tic-bang.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/ttt/tic-bang.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/ttt/tic-func.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/ttt/tic-func.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/ttt/ttt.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/ttt/ttt.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/ttt/uinc4.rkt" drdr:command-line ""
|
"collects/tests/racket/ttt/uinc4.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/ttt/veclib.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/ttt/veclib.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/udp.rkt" drdr:command-line ""
|
"collects/tests/racket/udp.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/uinc.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/uinc.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/uinc2.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/uinc2.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/uinc3.rkt" drdr:command-line ""
|
"collects/tests/racket/uinc3.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/uni-norm.rkt" drdr:command-line ""
|
"collects/tests/racket/uni-norm.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/unicode.rkt" drdr:command-line ""
|
"collects/tests/racket/unicode.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/unit.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/unit.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/unitsig.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/unitsig.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/unsafe.rkt" drdr:command-line ""
|
"collects/tests/racket/unsafe.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/vector.rkt" drdr:command-line ""
|
"collects/tests/racket/vector.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/version.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/version.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/will.rkt" drdr:command-line "mzscheme -f ~s"
|
"collects/tests/racket/will.rkt" drdr:command-line "racket -f ~s"
|
||||||
"collects/tests/mzscheme/zo-marshal.rkt" drdr:command-line ""
|
"collects/tests/racket/zo-marshal.rkt" drdr:command-line ""
|
||||||
"collects/tests/mzscheme/ztest.rkt" drdr:command-line ""
|
"collects/tests/racket/ztest.rkt" drdr:command-line ""
|
||||||
"collects/tests/net" responsible (eli)
|
"collects/tests/net" responsible (eli)
|
||||||
"collects/tests/plai" responsible (jay)
|
"collects/tests/plai" responsible (jay)
|
||||||
"collects/tests/plai/gc/bad-mutators/mut-1.rkt" drdr:command-line ""
|
"collects/tests/plai/gc/bad-mutators/mut-1.rkt" drdr:command-line ""
|
||||||
|
|
|
||||||
|
|
@ -96,7 +96,8 @@
|
||||||
;(when args (set! rest args))
|
;(when args (set! rest args))
|
||||||
(let ([n (make-base-empty-namespace)]
|
(let ([n (make-base-empty-namespace)]
|
||||||
[argv (if args (list->vector args) (vector))])
|
[argv (if args (list->vector args) (vector))])
|
||||||
(parameterize ([current-command-line-arguments argv])
|
(parameterize ([current-command-line-arguments argv]
|
||||||
|
[print-as-quasiquote #f])
|
||||||
(thread-wait
|
(thread-wait
|
||||||
(thread
|
(thread
|
||||||
(lambda ()
|
(lambda ()
|
||||||
|
|
|
||||||
|
|
@ -1044,7 +1044,7 @@
|
||||||
(display " " p)
|
(display " " p)
|
||||||
(display b p)))
|
(display b p)))
|
||||||
(display ")" p)))]))])
|
(display ")" p)))]))])
|
||||||
(pretty-print v port)))
|
(pretty-write v port)))
|
||||||
|
|
||||||
;; ----------------------------------------
|
;; ----------------------------------------
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -15,7 +15,7 @@
|
||||||
"mred"
|
"mred"
|
||||||
"mysterx"
|
"mysterx"
|
||||||
"mzcom"
|
"mzcom"
|
||||||
"mzscheme"
|
"racket"
|
||||||
"plai"
|
"plai"
|
||||||
"planet"
|
"planet"
|
||||||
"plot"
|
"plot"
|
||||||
|
|
|
||||||
|
|
@ -1,7 +1,7 @@
|
||||||
To run a benchmark, assuming you have `mzscheme' in your path:
|
To run a benchmark, assuming you have `racket' in your path:
|
||||||
./auto.ss <impl-or-benchmark> ...
|
./auto.rkt <impl-or-benchmark> ...
|
||||||
where <impl-or-benchmark> names an implementation as one of
|
where <impl-or-benchmark> names an implementation as one of
|
||||||
mzscheme
|
racket
|
||||||
bigloo
|
bigloo
|
||||||
chicken
|
chicken
|
||||||
gambit
|
gambit
|
||||||
|
|
@ -15,7 +15,7 @@ or a benchmark as one of
|
||||||
or any of the above prefixed by "no-" to skip the corresponding
|
or any of the above prefixed by "no-" to skip the corresponding
|
||||||
<impl-or-benchmark>. To see a complete list of implementations
|
<impl-or-benchmark>. To see a complete list of implementations
|
||||||
and benchmarks, run
|
and benchmarks, run
|
||||||
./auto.ss --show
|
./auto.rkt --show
|
||||||
|
|
||||||
Naming no implementation/benchmark causes a standard set of them to be
|
Naming no implementation/benchmark causes a standard set of them to be
|
||||||
run (as reported by --show). Similarly, if the first named
|
run (as reported by --show). Similarly, if the first named
|
||||||
|
|
@ -39,12 +39,12 @@ Most bechmarks were obtained from
|
||||||
Marc Feeley
|
Marc Feeley
|
||||||
|
|
||||||
Files that end in ".sch" are supposed to be standard Scheme plus `time'.
|
Files that end in ".sch" are supposed to be standard Scheme plus `time'.
|
||||||
Files that end in ".ss" are MzScheme wrapper modules or helper scripts.
|
Files that end in ".rkt" are Racket wrapper modules or helper scripts.
|
||||||
|
|
||||||
To build <benchmark>.sch directly with Gambit, Bigloo, or Chicken:
|
To build <benchmark>.sch directly with Gambit, Bigloo, or Chicken:
|
||||||
mzscheme -qr mk-gambit.ss <benchmark> ; gsi -:m10000 <benchmark>.o1
|
racket -qr mk-gambit.rkt <benchmark> ; gsi -:m10000 <benchmark>.o1
|
||||||
mzscheme -qr mk-bigloo.ss <benchmark> ; <benchmark>
|
racket -qr mk-bigloo.rkt <benchmark> ; <benchmark>
|
||||||
mzscheme -qr mk-chicken.ss <benchmark> ; <benchmark>
|
racket -qr mk-chicken.rkt <benchmark> ; <benchmark>
|
||||||
|
|
||||||
Unpack "dynamic-input.txt.gz" if you want to run the "dynamic" benchmark,
|
Unpack "dynamic-input.txt.gz" if you want to run the "dynamic" benchmark,
|
||||||
but the "auto.ss" script will do that for you.
|
but the "auto.rkt" script will do that for you.
|
||||||
|
|
@ -1,14 +1,14 @@
|
||||||
#!/bin/sh
|
#!/bin/sh
|
||||||
#|
|
#|
|
||||||
exec mzscheme -qu "$0" ${1+"$@"}
|
exec racket -qu "$0" ${1+"$@"}
|
||||||
|#
|
|#
|
||||||
|
|
||||||
;; See "tabulate.ss" for information on the output format
|
;; See "tabulate.rkt" for information on the output format
|
||||||
|
|
||||||
(module auto scheme/base
|
(module auto scheme/base
|
||||||
(require (for-syntax scheme/base)
|
(require (for-syntax scheme/base)
|
||||||
mzlib/process
|
mzlib/process
|
||||||
"cmdline.ss"
|
"cmdline.rkt"
|
||||||
mzlib/list
|
mzlib/list
|
||||||
mzlib/compile
|
mzlib/compile
|
||||||
mzlib/inflate
|
mzlib/inflate
|
||||||
|
|
@ -37,14 +37,14 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
(define (clean-up-o1 bm)
|
(define (clean-up-o1 bm)
|
||||||
(delete-file (format "~a.o1" bm)))
|
(delete-file (format "~a.o1" bm)))
|
||||||
|
|
||||||
(define (mk-mzscheme bm) (void))
|
(define (mk-racket bm) (void))
|
||||||
#;
|
#;
|
||||||
(define (mk-mzscheme bm)
|
(define (mk-racket bm)
|
||||||
(unless (directory-exists? "compiled")
|
(unless (directory-exists? "compiled")
|
||||||
(make-directory "compiled"))
|
(make-directory "compiled"))
|
||||||
(parameterize ([current-namespace (make-base-namespace)]
|
(parameterize ([current-namespace (make-base-namespace)]
|
||||||
[read-accept-reader #t])
|
[read-accept-reader #t])
|
||||||
(let ([name (format "~a.ss" bm)])
|
(let ([name (format "~a.rkt" bm)])
|
||||||
(compile-file name
|
(compile-file name
|
||||||
(build-path "compiled" (path-add-suffix name #".zo"))))))
|
(build-path "compiled" (path-add-suffix name #".zo"))))))
|
||||||
|
|
||||||
|
|
@ -59,7 +59,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
(with-output-to-file (format "~a.scm" bm)
|
(with-output-to-file (format "~a.scm" bm)
|
||||||
#:exists 'replace
|
#:exists 'replace
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(printf "(load \"r5rs-wrap.ss\")\n(load \"~a.sch\")\n" bm)))
|
(printf "(load \"r5rs-wrap.rkt\")\n(load \"~a.sch\")\n" bm)))
|
||||||
;; To get compilation time:
|
;; To get compilation time:
|
||||||
(parameterize ([current-namespace (make-base-empty-namespace)])
|
(parameterize ([current-namespace (make-base-empty-namespace)])
|
||||||
(namespace-require 'r5rs)
|
(namespace-require 'r5rs)
|
||||||
|
|
@ -77,7 +77,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
(when (file-exists? f)
|
(when (file-exists? f)
|
||||||
(delete-file f))))
|
(delete-file f))))
|
||||||
|
|
||||||
(define (mk-mzscheme-tl bm)
|
(define (mk-racket-tl bm)
|
||||||
;; To get compilation time:
|
;; To get compilation time:
|
||||||
(parameterize ([current-namespace (make-base-namespace)])
|
(parameterize ([current-namespace (make-base-namespace)])
|
||||||
(namespace-require 'scheme/base)
|
(namespace-require 'scheme/base)
|
||||||
|
|
@ -105,7 +105,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
|
|
||||||
(define (mk-mzc bm)
|
(define (mk-mzc bm)
|
||||||
(parameterize ([current-output-port (open-output-bytes)])
|
(parameterize ([current-output-port (open-output-bytes)])
|
||||||
(system (format "mzc ~a.ss" bm))))
|
(system (format "mzc ~a.rkt" bm))))
|
||||||
|
|
||||||
(define (clean-up-extension bm)
|
(define (clean-up-extension bm)
|
||||||
(delete-file (append-extension-suffix (symbol->string bm))))
|
(delete-file (append-extension-suffix (symbol->string bm))))
|
||||||
|
|
@ -258,7 +258,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
(cadr m)
|
(cadr m)
|
||||||
(or (cadddr m) #"0")))))
|
(or (cadddr m) #"0")))))
|
||||||
|
|
||||||
(define (extract-mzscheme-times bm str)
|
(define (extract-racket-times bm str)
|
||||||
(let ([m (regexp-match #rx#"cpu time: ([0-9]+) real time: ([0-9]+) gc time: ([0-9]+)" str)])
|
(let ([m (regexp-match #rx#"cpu time: ([0-9]+) real time: ([0-9]+) gc time: ([0-9]+)" str)])
|
||||||
(map bytes->number (cdr m))))
|
(map bytes->number (cdr m))))
|
||||||
|
|
||||||
|
|
@ -321,36 +321,36 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
|
|
||||||
(define impls
|
(define impls
|
||||||
(list
|
(list
|
||||||
(make-impl 'mzscheme
|
(make-impl 'racket
|
||||||
void
|
void
|
||||||
mk-mzscheme
|
mk-racket
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
(system (format "mzscheme -u ~a.ss" bm)))
|
(system (format "racket -u ~a.rkt" bm)))
|
||||||
extract-mzscheme-times
|
extract-racket-times
|
||||||
clean-up-zo
|
clean-up-zo
|
||||||
mutable-pair-progs)
|
mutable-pair-progs)
|
||||||
(make-impl 'mz-old
|
(make-impl 'mz-old
|
||||||
void
|
void
|
||||||
mk-mzscheme
|
mk-racket
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
(system (format "mz-old -u ~a.ss" bm)))
|
(system (format "mz-old -u ~a.rkt" bm)))
|
||||||
extract-mzscheme-times
|
extract-racket-times
|
||||||
clean-up-zo
|
clean-up-zo
|
||||||
mutable-pair-progs)
|
mutable-pair-progs)
|
||||||
(make-impl 'mzschemecgc
|
(make-impl 'racketcgc
|
||||||
void
|
void
|
||||||
mk-mzscheme
|
mk-racket
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
(system (format "mzschemecgc -u ~a.ss" bm)))
|
(system (format "racketcgc -u ~a.rkt" bm)))
|
||||||
extract-mzscheme-times
|
extract-racket-times
|
||||||
clean-up-zo
|
clean-up-zo
|
||||||
mutable-pair-progs)
|
mutable-pair-progs)
|
||||||
(make-impl 'mzscheme3m
|
(make-impl 'racket3m
|
||||||
void
|
void
|
||||||
mk-mzscheme
|
mk-racket
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
(system (format "mzscheme3m -u ~a.ss" bm)))
|
(system (format "racket3m -u ~a.rkt" bm)))
|
||||||
extract-mzscheme-times
|
extract-racket-times
|
||||||
clean-up-zo
|
clean-up-zo
|
||||||
mutable-pair-progs)
|
mutable-pair-progs)
|
||||||
(make-impl 'plt-r5rs
|
(make-impl 'plt-r5rs
|
||||||
|
|
@ -358,62 +358,62 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
mk-plt-r5rs
|
mk-plt-r5rs
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
(system (format "plt-r5rs ~a.scm" bm)))
|
(system (format "plt-r5rs ~a.scm" bm)))
|
||||||
extract-mzscheme-times
|
extract-racket-times
|
||||||
clean-up-plt-r5rs
|
clean-up-plt-r5rs
|
||||||
null)
|
null)
|
||||||
(make-impl 'mzc
|
(make-impl 'mzc
|
||||||
void
|
void
|
||||||
mk-mzc
|
mk-mzc
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
(system (format "mzscheme -mvqee '(load-extension \"~a\")' '(require ~a)'"
|
(system (format "racket -mvqee '(load-extension \"~a\")' '(require ~a)'"
|
||||||
(append-extension-suffix (symbol->string bm))
|
(append-extension-suffix (symbol->string bm))
|
||||||
bm)))
|
bm)))
|
||||||
extract-mzscheme-times
|
extract-racket-times
|
||||||
clean-up-extension
|
clean-up-extension
|
||||||
(append '(takr takr2)
|
(append '(takr takr2)
|
||||||
mutable-pair-progs))
|
mutable-pair-progs))
|
||||||
(make-impl 'mzscheme-j
|
(make-impl 'racket-j
|
||||||
void
|
void
|
||||||
mk-mzscheme
|
mk-racket
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
(system (format "mzscheme -jqu ~a.ss" bm)))
|
(system (format "racket -jqu ~a.rkt" bm)))
|
||||||
extract-mzscheme-times
|
extract-racket-times
|
||||||
clean-up-zo
|
clean-up-zo
|
||||||
mutable-pair-progs)
|
mutable-pair-progs)
|
||||||
(make-impl 'mzschemecgc-j
|
(make-impl 'racketcgc-j
|
||||||
void
|
void
|
||||||
mk-mzscheme
|
mk-racket
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
(system (format "mzschemecgc -jqu ~a.ss" bm)))
|
(system (format "racketcgc -jqu ~a.rkt" bm)))
|
||||||
extract-mzscheme-times
|
extract-racket-times
|
||||||
clean-up-zo
|
clean-up-zo
|
||||||
mutable-pair-progs)
|
mutable-pair-progs)
|
||||||
(make-impl 'mzschemecgc-tl
|
(make-impl 'racketcgc-tl
|
||||||
void
|
void
|
||||||
mk-mzscheme-tl
|
mk-racket-tl
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
(system (format "mzschemecgc -qr compiled/~a.zo" bm)))
|
(system (format "racketcgc -qr compiled/~a.zo" bm)))
|
||||||
extract-mzscheme-times
|
extract-racket-times
|
||||||
clean-up-zo
|
clean-up-zo
|
||||||
(append '(nucleic2)
|
(append '(nucleic2)
|
||||||
mutable-pair-progs))
|
mutable-pair-progs))
|
||||||
(make-impl 'chicken
|
(make-impl 'chicken
|
||||||
void
|
void
|
||||||
(run-mk "mk-chicken.ss")
|
(run-mk "mk-chicken.rkt")
|
||||||
run-exe
|
run-exe
|
||||||
extract-chicken-times
|
extract-chicken-times
|
||||||
clean-up-bin
|
clean-up-bin
|
||||||
'(scheme2 takr2))
|
'(scheme2 takr2))
|
||||||
(make-impl 'bigloo
|
(make-impl 'bigloo
|
||||||
void
|
void
|
||||||
(run-mk "mk-bigloo.ss")
|
(run-mk "mk-bigloo.rkt")
|
||||||
run-exe
|
run-exe
|
||||||
extract-bigloo-times
|
extract-bigloo-times
|
||||||
clean-up-bin
|
clean-up-bin
|
||||||
'(cpstack takr2))
|
'(cpstack takr2))
|
||||||
(make-impl 'gambit
|
(make-impl 'gambit
|
||||||
void
|
void
|
||||||
(run-mk "mk-gambit.ss")
|
(run-mk "mk-gambit.rkt")
|
||||||
run-gambit-exe
|
run-gambit-exe
|
||||||
extract-gambit-times
|
extract-gambit-times
|
||||||
clean-up-o1
|
clean-up-o1
|
||||||
|
|
@ -462,7 +462,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
'(ctak))
|
'(ctak))
|
||||||
))
|
))
|
||||||
|
|
||||||
(define obsolte-impls '(mzscheme3m mzschemecgc mzscheme-j mzschemecgc-j mzschemecgc-tl mzc mz-old))
|
(define obsolte-impls '(racket3m racketcgc racket-j racketcgc-j racketcgc-tl mzc mz-old))
|
||||||
|
|
||||||
(define benchmarks
|
(define benchmarks
|
||||||
'(conform
|
'(conform
|
||||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user