move tests/mzscheme to tests/racket

This commit is contained in:
Matthew Flatt 2010-04-27 18:28:39 -06:00
parent 28b4043077
commit 882b7dce0e
338 changed files with 309 additions and 304 deletions

View File

@ -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/mystests.rkt" drdr:command-line ""
"collects/tests/mzcom/test.rkt" drdr:command-line ""
"collects/tests/mzscheme" responsible (mflatt)
"collects/tests/mzscheme/advanced.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/all.rkt" drdr:command-line ""
"collects/tests/mzscheme/async-channel.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/awk.rkt" drdr:command-line ""
"collects/tests/mzscheme/basic.rkt" drdr:command-line ""
"collects/tests/mzscheme/beg-adv.rkt" drdr:command-line ""
"collects/tests/mzscheme/beg-bega.rkt" drdr:command-line ""
"collects/tests/mzscheme/beg-intm.rkt" drdr:command-line ""
"collects/tests/mzscheme/beg-intml.rkt" drdr:command-line ""
"collects/tests/mzscheme/bega-adv.rkt" drdr:command-line ""
"collects/tests/mzscheme/beginner-abbr.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/beginner.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/benchmarks/common/auto.rkt" drdr:command-line "mzscheme ~s -- mzscheme ctak"
"collects/tests/mzscheme/benchmarks/common/conform.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/ctak.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/destruct.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/div.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/dynamic.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/dynamic2.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/graphs.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/lattice.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/maze.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/maze2.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/mazefun.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/mk-bigloo.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/mk-chicken.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/mk-gambit.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/nestedloop.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/nqueens.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/paraffins.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/peval.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/r5rs-wrap.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/benchmarks/common/scheme.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/scheme2.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/sort1.rkt" drdr:command-line ""
"collects/tests/mzscheme/benchmarks/common/tak.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/takl.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/benchmarks/common/takr.rkt" drdr:command-line "mzc ~s"
"collects/tests/mzscheme/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/mzscheme/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/mzscheme/benchmarks/mz/ssax.scm" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/benchmarks/rx/auto.rkt" drdr:command-line "mzscheme -qt ~s -- mzscheme simple" drdr:timeout 600
"collects/tests/mzscheme/benchmarks/rx/pcre.rkt" drdr:command-line "mzscheme ~s \"mz\"\"scheme\""
"collects/tests/mzscheme/benchmarks/shootout/ackermann.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/binarytrees.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/chameneos.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/cheapconcurrency.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/fannkuch.rkt" drdr:command-line "mzscheme -t ~s -- 4"
"collects/tests/mzscheme/benchmarks/shootout/fasta.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/hash.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/hash2.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/mandelbrot-generic.rkt" drdr:command-line "mzscheme -t ~s -- 15"
"collects/tests/mzscheme/benchmarks/shootout/mandelbrot-unsafe.rkt" drdr:command-line "mzscheme ~s 3"
"collects/tests/mzscheme/benchmarks/shootout/mandelbrot.rkt" drdr:command-line "mzscheme -t ~s -- 15"
"collects/tests/mzscheme/benchmarks/shootout/meteor.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/nbody-generic.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/nbody-vec-generic.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/nbody-vec-unsafe.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/nbody-vec.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/nbody.rkt" drdr:command-line "mzscheme -t ~s -- 10"
"collects/tests/mzscheme/benchmarks/shootout/nestedloop.rkt" drdr:command-line "mzscheme -t ~s -- 2"
"collects/tests/mzscheme/benchmarks/shootout/nsieve.rkt" drdr:command-line "mzscheme -t ~s -- 2"
"collects/tests/mzscheme/benchmarks/shootout/nsievebits.rkt" drdr:command-line "mzscheme -t ~s -- 2"
"collects/tests/mzscheme/benchmarks/shootout/partialsums.rkt" drdr:command-line "mzscheme -t ~s -- 25"
"collects/tests/mzscheme/benchmarks/shootout/pidigits-gmp.rkt" drdr:command-line "mzscheme ~s 10"
"collects/tests/mzscheme/benchmarks/shootout/pidigits.rkt" drdr:command-line "mzscheme -t ~s -- 25"
"collects/tests/mzscheme/benchmarks/shootout/random.rkt" drdr:command-line "mzscheme -t ~s -- 25"
"collects/tests/mzscheme/benchmarks/shootout/recursive.rkt" drdr:command-line "mzscheme -t ~s -- 2"
"collects/tests/mzscheme/benchmarks/shootout/run.rkt" drdr:command-line "mzscheme -t ~s -- nsieve.rkt 1"
"collects/tests/mzscheme/benchmarks/shootout/spectralnorm-generic.rkt" drdr:command-line "mzscheme -t ~s -- 25"
"collects/tests/mzscheme/benchmarks/shootout/spectralnorm-unsafe.rkt" drdr:command-line "mzscheme ~s 5"
"collects/tests/mzscheme/benchmarks/shootout/spectralnorm.rkt" drdr:command-line "mzscheme -t ~s -- 25"
"collects/tests/mzscheme/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/mzscheme/benchmarks/shootout/thread-ring.rkt" drdr:command-line "mzscheme -t ~s -- 25"
"collects/tests/mzscheme/binc.rkt" drdr:command-line ""
"collects/tests/mzscheme/boundmap-test.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/cache-image-snip-test.rkt" drdr:command-line "mred -f ~s"
"collects/tests/mzscheme/censor.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/chaperone.rkt" drdr:command-line ""
"collects/tests/mzscheme/char-set.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/chez-module.rkt" drdr:command-line ""
"collects/tests/mzscheme/cm.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/cmdline.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/compat.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/compile.rkt" drdr:command-line ""
"collects/tests/mzscheme/contmark.rkt" drdr:command-line ""
"collects/tests/mzscheme/contract-mzlib-test.rkt" drdr:command-line ""
"collects/tests/mzscheme/contract-opt-tests.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/contract-test.rkt" responsible (robby) drdr:command-line ""
"collects/tests/mzscheme/control.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/date.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/deep.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/dict.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/embed-in-c.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/embed-me4.rkt" drdr:command-line ""
"collects/tests/mzscheme/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/mzscheme/embed-me9.rkt" drdr:command-line ""
"collects/tests/mzscheme/embed.rkt" drdr:command-line ""
"collects/tests/mzscheme/etc.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/expand.rkt" drdr:command-line ""
"collects/tests/mzscheme/fact.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/file.rkt" drdr:command-line ""
"collects/tests/mzscheme/filelib.rkt" drdr:command-line "" drdr:timeout 360
"collects/tests/mzscheme/fixnum.rkt" drdr:command-line "mzscheme -f ~s" drdr:timeout 360
"collects/tests/mzscheme/for.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/foreign-test.c" responsible (eli)
"collects/tests/mzscheme/foreign-test.rkt" responsible (eli) drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/function.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/head.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/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/mzscheme/htdp.rkt" drdr:command-line ""
"collects/tests/mzscheme/id-table-test.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/imap.rkt" drdr:command-line ""
"collects/tests/mzscheme/intermediate-lambda.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/intermediate.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/intm-adv.rkt" drdr:command-line ""
"collects/tests/mzscheme/intm-intml.rkt" drdr:command-line ""
"collects/tests/mzscheme/intmlam-adv.rkt" drdr:command-line ""
"collects/tests/mzscheme/ktest.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/kw.rkt" responsible (eli) drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/list.rkt" drdr:command-line ""
"collects/tests/mzscheme/loadable.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/loadtest.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/logger.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/loop.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/ltest.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/macro.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/macrolib.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/makeflat.rkt" drdr:command-line ""
"collects/tests/mzscheme/makeflats.rkt" drdr:command-line ""
"collects/tests/mzscheme/math.rkt" drdr:command-line ""
"collects/tests/mzscheme/moddep.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/modprot.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/module-reader.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/module.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/mpair.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/mz-tests.rkt" drdr:command-line ""
"collects/tests/mzscheme/mzlib-tests.rkt" drdr:command-line ""
"collects/tests/mzscheme/mzq.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/name.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/namespac.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/nch.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/net.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/number.rkt" drdr:command-line ""
"collects/tests/mzscheme/numstrs.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/object-old.rkt" drdr:command-line ""
"collects/tests/mzscheme/object.rkt" drdr:command-line ""
"collects/tests/mzscheme/oe.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/openssl.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/optimize.rkt" drdr:command-line ""
"collects/tests/mzscheme/pack.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/package-gen.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/package.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/parallel.rkt" drdr:command-line ""
"collects/tests/mzscheme/param.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/path.rkt" drdr:command-line ""
"collects/tests/mzscheme/pathlib.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/pconvert.rkt" drdr:command-line ""
"collects/tests/mzscheme/place-channel.rkt" drdr:command-line ""
"collects/tests/mzscheme/port.rkt" drdr:command-line ""
"collects/tests/mzscheme/portlib.rkt" drdr:command-line ""
"collects/tests/mzscheme/pp-regression.rkt" drdr:command-line ""
"collects/tests/mzscheme/pretty.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/procs.rkt" drdr:command-line ""
"collects/tests/mzscheme/prompt-tests.rkt" drdr:command-line ""
"collects/tests/mzscheme/prompt.rkt" drdr:command-line ""
"collects/tests/mzscheme/quiet.rkt" drdr:command-line "mzscheme -f ~s" drdr:timeout 360
"collects/tests/mzscheme/read.rkt" drdr:command-line ""
"collects/tests/mzscheme/readtable.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/restart.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/runflats.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/rx.rkt" drdr:command-line ""
"collects/tests/mzscheme/sandbox.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/scheme-tests.rkt" drdr:command-line ""
"collects/tests/mzscheme/serialize.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/set.rkt" drdr:command-line ""
"collects/tests/mzscheme/shared-tests.rkt" drdr:command-line ""
"collects/tests/mzscheme/shared.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/srfi.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/stream.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/string-mzlib.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/string.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/struct.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/structlib.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/stx.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/subprocess.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/sync.rkt" drdr:command-line ""
"collects/tests/mzscheme/syntax-tests.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/syntax.rkt" drdr:command-line ""
"collects/tests/mzscheme/tcp.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/testing.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/thread.rkt" drdr:command-line ""
"collects/tests/mzscheme/threadlib.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/thrport.rkt" drdr:command-line ""
"collects/tests/mzscheme/trace.rkt" drdr:command-line ""
"collects/tests/mzscheme/trait.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/ttt/listlib.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/ttt/tic-bang.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/ttt/tic-func.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/ttt/ttt.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/ttt/uinc4.rkt" drdr:command-line ""
"collects/tests/mzscheme/ttt/veclib.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/udp.rkt" drdr:command-line ""
"collects/tests/mzscheme/uinc.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/uinc2.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/uinc3.rkt" drdr:command-line ""
"collects/tests/mzscheme/uni-norm.rkt" drdr:command-line ""
"collects/tests/mzscheme/unicode.rkt" drdr:command-line ""
"collects/tests/mzscheme/unit.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/unitsig.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/unsafe.rkt" drdr:command-line ""
"collects/tests/mzscheme/vector.rkt" drdr:command-line ""
"collects/tests/mzscheme/version.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/will.rkt" drdr:command-line "mzscheme -f ~s"
"collects/tests/mzscheme/zo-marshal.rkt" drdr:command-line ""
"collects/tests/mzscheme/ztest.rkt" drdr:command-line ""
"collects/tests/racket" responsible (mflatt)
"collects/tests/racket/advanced.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/all.rkt" drdr:command-line ""
"collects/tests/racket/async-channel.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/awk.rkt" drdr:command-line ""
"collects/tests/racket/basic.rkt" drdr:command-line ""
"collects/tests/racket/beg-adv.rkt" drdr:command-line ""
"collects/tests/racket/beg-bega.rkt" drdr:command-line ""
"collects/tests/racket/beg-intm.rkt" drdr:command-line ""
"collects/tests/racket/beg-intml.rkt" drdr:command-line ""
"collects/tests/racket/bega-adv.rkt" drdr:command-line ""
"collects/tests/racket/beginner-abbr.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/beginner.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/benchmarks/common/auto.rkt" drdr:command-line "racket ~s -- racket ctak"
"collects/tests/racket/benchmarks/common/conform.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/ctak.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/destruct.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/div.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/dynamic.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/dynamic2.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/graphs.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/lattice.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/maze.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/maze2.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/mazefun.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/mk-bigloo.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/mk-chicken.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/mk-gambit.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/nestedloop.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/nqueens.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/paraffins.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/peval.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/r5rs-wrap.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/benchmarks/common/scheme.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/scheme2.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/sort1.rkt" drdr:command-line ""
"collects/tests/racket/benchmarks/common/tak.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/takl.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/takr.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/common/takr2.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/mz/expand-class.scm" drdr:command-line "racket -f ~s"
"collects/tests/racket/benchmarks/mz/parsing.scm" drdr:command-line "mred -f ~s"
"collects/tests/racket/benchmarks/mz/redsem.scm" drdr:command-line "racket -f ~s -- --skip-struct-test"
"collects/tests/racket/benchmarks/mz/ssax.scm" drdr:command-line "racket -f ~s"
"collects/tests/racket/benchmarks/rx/auto.rkt" drdr:command-line "racket -qt ~s -- racket simple" drdr:timeout 600
"collects/tests/racket/benchmarks/rx/pcre.rkt" drdr:command-line "racket ~s \"mz\"\"scheme\""
"collects/tests/racket/benchmarks/shootout/ackermann.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/binarytrees.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/chameneos.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/cheapconcurrency.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/fannkuch.rkt" drdr:command-line "racket -t ~s -- 4"
"collects/tests/racket/benchmarks/shootout/fasta.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/hash.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/hash2.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/mandelbrot-generic.rkt" drdr:command-line "racket -t ~s -- 15"
"collects/tests/racket/benchmarks/shootout/mandelbrot-unsafe.rkt" drdr:command-line "racket ~s 3"
"collects/tests/racket/benchmarks/shootout/mandelbrot.rkt" drdr:command-line "racket -t ~s -- 15"
"collects/tests/racket/benchmarks/shootout/meteor.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/nbody-generic.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/nbody-vec-generic.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/nbody-vec-unsafe.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/nbody-vec.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/nbody.rkt" drdr:command-line "racket -t ~s -- 10"
"collects/tests/racket/benchmarks/shootout/nestedloop.rkt" drdr:command-line "racket -t ~s -- 2"
"collects/tests/racket/benchmarks/shootout/nsieve.rkt" drdr:command-line "racket -t ~s -- 2"
"collects/tests/racket/benchmarks/shootout/nsievebits.rkt" drdr:command-line "racket -t ~s -- 2"
"collects/tests/racket/benchmarks/shootout/partialsums.rkt" drdr:command-line "racket -t ~s -- 25"
"collects/tests/racket/benchmarks/shootout/pidigits-gmp.rkt" drdr:command-line "racket ~s 10"
"collects/tests/racket/benchmarks/shootout/pidigits.rkt" drdr:command-line "racket -t ~s -- 25"
"collects/tests/racket/benchmarks/shootout/random.rkt" drdr:command-line "racket -t ~s -- 25"
"collects/tests/racket/benchmarks/shootout/recursive.rkt" drdr:command-line "racket -t ~s -- 2"
"collects/tests/racket/benchmarks/shootout/run.rkt" drdr:command-line "racket -t ~s -- nsieve.rkt 1"
"collects/tests/racket/benchmarks/shootout/spectralnorm-generic.rkt" drdr:command-line "racket -t ~s -- 25"
"collects/tests/racket/benchmarks/shootout/spectralnorm-unsafe.rkt" drdr:command-line "racket ~s 5"
"collects/tests/racket/benchmarks/shootout/spectralnorm.rkt" drdr:command-line "racket -t ~s -- 25"
"collects/tests/racket/benchmarks/shootout/spellcheck.rkt" drdr:command-line "mzc ~s"
"collects/tests/racket/benchmarks/shootout/strcat.rkt" drdr:command-line "racket -t ~s -- 25"
"collects/tests/racket/benchmarks/shootout/thread-ring.rkt" drdr:command-line "racket -t ~s -- 25"
"collects/tests/racket/binc.rkt" drdr:command-line ""
"collects/tests/racket/boundmap-test.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/cache-image-snip-test.rkt" drdr:command-line "mred -f ~s"
"collects/tests/racket/censor.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/chaperone.rkt" drdr:command-line ""
"collects/tests/racket/char-set.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/chez-module.rkt" drdr:command-line ""
"collects/tests/racket/cm.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/cmdline.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/compat.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/compile.rkt" drdr:command-line ""
"collects/tests/racket/contmark.rkt" drdr:command-line ""
"collects/tests/racket/contract-mzlib-test.rkt" drdr:command-line ""
"collects/tests/racket/contract-opt-tests.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/contract-test.rkt" responsible (robby) drdr:command-line ""
"collects/tests/racket/control.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/date.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/deep.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/dict.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/embed-in-c.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/embed-me4.rkt" drdr:command-line ""
"collects/tests/racket/embed-me5.rkt" drdr:command-line "mred-text -t ~s"
"collects/tests/racket/embed-me7.rkt" drdr:command-line "mred-text -t ~s"
"collects/tests/racket/embed-me9.rkt" drdr:command-line ""
"collects/tests/racket/embed.rkt" drdr:command-line ""
"collects/tests/racket/etc.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/expand.rkt" drdr:command-line ""
"collects/tests/racket/fact.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/file.rkt" drdr:command-line ""
"collects/tests/racket/filelib.rkt" drdr:command-line "" drdr:timeout 360
"collects/tests/racket/fixnum.rkt" drdr:command-line "racket -f ~s" drdr:timeout 360
"collects/tests/racket/for.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/foreign-test.c" responsible (eli)
"collects/tests/racket/foreign-test.rkt" responsible (eli) drdr:command-line "racket -f ~s"
"collects/tests/racket/function.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/head.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/htdp-image.rkt" responsible (robby) drdr:command-line "mred -f ~s"
"collects/tests/racket/htdp-test.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/htdp.rkt" drdr:command-line ""
"collects/tests/racket/id-table-test.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/imap.rkt" drdr:command-line ""
"collects/tests/racket/intermediate-lambda.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/intermediate.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/intm-adv.rkt" drdr:command-line ""
"collects/tests/racket/intm-intml.rkt" drdr:command-line ""
"collects/tests/racket/intmlam-adv.rkt" drdr:command-line ""
"collects/tests/racket/ktest.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/kw.rkt" responsible (eli) drdr:command-line "racket -f ~s"
"collects/tests/racket/list.rkt" drdr:command-line ""
"collects/tests/racket/loadable.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/loadtest.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/logger.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/loop.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/ltest.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/macro.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/macrolib.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/makeflat.rkt" drdr:command-line ""
"collects/tests/racket/makeflats.rkt" drdr:command-line ""
"collects/tests/racket/math.rkt" drdr:command-line ""
"collects/tests/racket/moddep.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/modprot.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/module-reader.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/module.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/mpair.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/mz-tests.rkt" drdr:command-line ""
"collects/tests/racket/mzlib-tests.rkt" drdr:command-line ""
"collects/tests/racket/mzq.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/name.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/namespac.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/nch.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/net.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/number.rkt" drdr:command-line ""
"collects/tests/racket/numstrs.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/object-old.rkt" drdr:command-line ""
"collects/tests/racket/object.rkt" drdr:command-line ""
"collects/tests/racket/oe.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/openssl.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/optimize.rkt" drdr:command-line ""
"collects/tests/racket/pack.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/package-gen.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/package.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/parallel.rkt" drdr:command-line ""
"collects/tests/racket/param.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/path.rkt" drdr:command-line ""
"collects/tests/racket/pathlib.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/pconvert.rkt" drdr:command-line ""
"collects/tests/racket/place-channel.rkt" drdr:command-line ""
"collects/tests/racket/port.rkt" drdr:command-line ""
"collects/tests/racket/portlib.rkt" drdr:command-line ""
"collects/tests/racket/pp-regression.rkt" drdr:command-line ""
"collects/tests/racket/pretty.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/procs.rkt" drdr:command-line ""
"collects/tests/racket/prompt-tests.rkt" drdr:command-line ""
"collects/tests/racket/prompt.rkt" drdr:command-line ""
"collects/tests/racket/quiet.rkt" drdr:command-line "racket -f ~s" drdr:timeout 360
"collects/tests/racket/read.rkt" drdr:command-line ""
"collects/tests/racket/readtable.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/restart.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/runflats.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/rx.rkt" drdr:command-line ""
"collects/tests/racket/sandbox.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/scheme-tests.rkt" drdr:command-line ""
"collects/tests/racket/serialize.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/set.rkt" drdr:command-line ""
"collects/tests/racket/shared-tests.rkt" drdr:command-line ""
"collects/tests/racket/shared.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/srfi.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/stream.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/string-mzlib.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/string.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/struct.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/structlib.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/stx.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/subprocess.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/sync.rkt" drdr:command-line ""
"collects/tests/racket/syntax-tests.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/syntax.rkt" drdr:command-line ""
"collects/tests/racket/tcp.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/testing.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/thread.rkt" drdr:command-line ""
"collects/tests/racket/threadlib.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/thrport.rkt" drdr:command-line ""
"collects/tests/racket/trace.rkt" drdr:command-line ""
"collects/tests/racket/trait.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/ttt/listlib.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/ttt/tic-bang.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/ttt/tic-func.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/ttt/ttt.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/ttt/uinc4.rkt" drdr:command-line ""
"collects/tests/racket/ttt/veclib.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/udp.rkt" drdr:command-line ""
"collects/tests/racket/uinc.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/uinc2.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/uinc3.rkt" drdr:command-line ""
"collects/tests/racket/uni-norm.rkt" drdr:command-line ""
"collects/tests/racket/unicode.rkt" drdr:command-line ""
"collects/tests/racket/unit.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/unitsig.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/unsafe.rkt" drdr:command-line ""
"collects/tests/racket/vector.rkt" drdr:command-line ""
"collects/tests/racket/version.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/will.rkt" drdr:command-line "racket -f ~s"
"collects/tests/racket/zo-marshal.rkt" drdr:command-line ""
"collects/tests/racket/ztest.rkt" drdr:command-line ""
"collects/tests/net" responsible (eli)
"collects/tests/plai" responsible (jay)
"collects/tests/plai/gc/bad-mutators/mut-1.rkt" drdr:command-line ""

View File

@ -96,7 +96,8 @@
;(when args (set! rest args))
(let ([n (make-base-empty-namespace)]
[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
(lambda ()

View File

@ -1044,7 +1044,7 @@
(display " " p)
(display b p)))
(display ")" p)))]))])
(pretty-print v port)))
(pretty-write v port)))
;; ----------------------------------------

View File

@ -15,7 +15,7 @@
"mred"
"mysterx"
"mzcom"
"mzscheme"
"racket"
"plai"
"planet"
"plot"

View File

@ -1,7 +1,7 @@
To run a benchmark, assuming you have `mzscheme' in your path:
./auto.ss <impl-or-benchmark> ...
To run a benchmark, assuming you have `racket' in your path:
./auto.rkt <impl-or-benchmark> ...
where <impl-or-benchmark> names an implementation as one of
mzscheme
racket
bigloo
chicken
gambit
@ -15,7 +15,7 @@ or a benchmark as one of
or any of the above prefixed by "no-" to skip the corresponding
<impl-or-benchmark>. To see a complete list of implementations
and benchmarks, run
./auto.ss --show
./auto.rkt --show
Naming no implementation/benchmark causes a standard set of them to be
run (as reported by --show). Similarly, if the first named
@ -39,12 +39,12 @@ Most bechmarks were obtained from
Marc Feeley
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:
mzscheme -qr mk-gambit.ss <benchmark> ; gsi -:m10000 <benchmark>.o1
mzscheme -qr mk-bigloo.ss <benchmark> ; <benchmark>
mzscheme -qr mk-chicken.ss <benchmark> ; <benchmark>
racket -qr mk-gambit.rkt <benchmark> ; gsi -:m10000 <benchmark>.o1
racket -qr mk-bigloo.rkt <benchmark> ; <benchmark>
racket -qr mk-chicken.rkt <benchmark> ; <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.

View File

@ -1,14 +1,14 @@
#!/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
(require (for-syntax scheme/base)
mzlib/process
"cmdline.ss"
"cmdline.rkt"
mzlib/list
mzlib/compile
mzlib/inflate
@ -37,14 +37,14 @@ exec mzscheme -qu "$0" ${1+"$@"}
(define (clean-up-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")
(make-directory "compiled"))
(parameterize ([current-namespace (make-base-namespace)]
[read-accept-reader #t])
(let ([name (format "~a.ss" bm)])
(let ([name (format "~a.rkt" bm)])
(compile-file name
(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)
#:exists 'replace
(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:
(parameterize ([current-namespace (make-base-empty-namespace)])
(namespace-require 'r5rs)
@ -77,7 +77,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
(when (file-exists? f)
(delete-file f))))
(define (mk-mzscheme-tl bm)
(define (mk-racket-tl bm)
;; To get compilation time:
(parameterize ([current-namespace (make-base-namespace)])
(namespace-require 'scheme/base)
@ -105,7 +105,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
(define (mk-mzc bm)
(parameterize ([current-output-port (open-output-bytes)])
(system (format "mzc ~a.ss" bm))))
(system (format "mzc ~a.rkt" bm))))
(define (clean-up-extension bm)
(delete-file (append-extension-suffix (symbol->string bm))))
@ -258,7 +258,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
(cadr m)
(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)])
(map bytes->number (cdr m))))
@ -321,36 +321,36 @@ exec mzscheme -qu "$0" ${1+"$@"}
(define impls
(list
(make-impl 'mzscheme
(make-impl 'racket
void
mk-mzscheme
mk-racket
(lambda (bm)
(system (format "mzscheme -u ~a.ss" bm)))
extract-mzscheme-times
(system (format "racket -u ~a.rkt" bm)))
extract-racket-times
clean-up-zo
mutable-pair-progs)
(make-impl 'mz-old
void
mk-mzscheme
mk-racket
(lambda (bm)
(system (format "mz-old -u ~a.ss" bm)))
extract-mzscheme-times
(system (format "mz-old -u ~a.rkt" bm)))
extract-racket-times
clean-up-zo
mutable-pair-progs)
(make-impl 'mzschemecgc
(make-impl 'racketcgc
void
mk-mzscheme
mk-racket
(lambda (bm)
(system (format "mzschemecgc -u ~a.ss" bm)))
extract-mzscheme-times
(system (format "racketcgc -u ~a.rkt" bm)))
extract-racket-times
clean-up-zo
mutable-pair-progs)
(make-impl 'mzscheme3m
(make-impl 'racket3m
void
mk-mzscheme
mk-racket
(lambda (bm)
(system (format "mzscheme3m -u ~a.ss" bm)))
extract-mzscheme-times
(system (format "racket3m -u ~a.rkt" bm)))
extract-racket-times
clean-up-zo
mutable-pair-progs)
(make-impl 'plt-r5rs
@ -358,62 +358,62 @@ exec mzscheme -qu "$0" ${1+"$@"}
mk-plt-r5rs
(lambda (bm)
(system (format "plt-r5rs ~a.scm" bm)))
extract-mzscheme-times
extract-racket-times
clean-up-plt-r5rs
null)
(make-impl 'mzc
void
mk-mzc
(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))
bm)))
extract-mzscheme-times
extract-racket-times
clean-up-extension
(append '(takr takr2)
mutable-pair-progs))
(make-impl 'mzscheme-j
(make-impl 'racket-j
void
mk-mzscheme
mk-racket
(lambda (bm)
(system (format "mzscheme -jqu ~a.ss" bm)))
extract-mzscheme-times
(system (format "racket -jqu ~a.rkt" bm)))
extract-racket-times
clean-up-zo
mutable-pair-progs)
(make-impl 'mzschemecgc-j
(make-impl 'racketcgc-j
void
mk-mzscheme
mk-racket
(lambda (bm)
(system (format "mzschemecgc -jqu ~a.ss" bm)))
extract-mzscheme-times
(system (format "racketcgc -jqu ~a.rkt" bm)))
extract-racket-times
clean-up-zo
mutable-pair-progs)
(make-impl 'mzschemecgc-tl
(make-impl 'racketcgc-tl
void
mk-mzscheme-tl
mk-racket-tl
(lambda (bm)
(system (format "mzschemecgc -qr compiled/~a.zo" bm)))
extract-mzscheme-times
(system (format "racketcgc -qr compiled/~a.zo" bm)))
extract-racket-times
clean-up-zo
(append '(nucleic2)
mutable-pair-progs))
(make-impl 'chicken
void
(run-mk "mk-chicken.ss")
(run-mk "mk-chicken.rkt")
run-exe
extract-chicken-times
clean-up-bin
'(scheme2 takr2))
(make-impl 'bigloo
void
(run-mk "mk-bigloo.ss")
(run-mk "mk-bigloo.rkt")
run-exe
extract-bigloo-times
clean-up-bin
'(cpstack takr2))
(make-impl 'gambit
void
(run-mk "mk-gambit.ss")
(run-mk "mk-gambit.rkt")
run-gambit-exe
extract-gambit-times
clean-up-o1
@ -462,7 +462,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
'(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
'(conform

Some files were not shown because too many files have changed in this diff Show More