From e226ad66c5fb6095d5702e5c47f5c7cf73e914f5 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sun, 29 Dec 2013 10:29:19 -0600 Subject: [PATCH] move "props" test configs to `test` submodules or "info.rkt" files The "props" file still has * ".rkt" `drdr:timeout` entries, needed until DrDr uses submodules and "info.rkt" files; although timeout information has been put in submodules for `raco test`, DrDr uses `raco test` in a way that does not enable timeouts, so that DrDr can implement timeouts itself (and record when a test times out) * ".rkt" `drdr:random #t` entries; not sure what to do with these, yet * ".rkt" `responsible` entries; not sure what to do with these, yet * ".rktl" `drdr:command-line #f` entries, needed until all ".rktl" files are disabled in DrDr The following files were previously disabled for DrDr testing, but were intentionally left as enabled with these changes: pkgs/racket-pkgs/racket-test/tests/pkg/shelly.rkt pkgs/racket-pkgs/racket-test/tests/pkg/util.rkt pkgs/racket-pkgs/racket-test/tests/pkg/info.rkt pkgs/racket-pkgs/racket-test/tests/pkg/basic-index.rkt pkgs/racket-pkgs/racket-test/tests/racket/link.rkt pkgs/racket-pkgs/racket-test/tests/racket/embed-in-c.rkt pkgs/racket-pkgs/racket-doc/ffi/examples/use-c-printf.rkt pkgs/racket-pkgs/racket-doc/ffi/examples/c-printf.rkt pkgs/parser-tools-pkgs/parser-tools-lib/parser-tools/private-lex/error-tests.rkt pkgs/mysterx/mysterx.rkt pkgs/mysterx/main.rkt pkgs/games/gobblet/test-model.rkt pkgs/games/gobblet/test-explore.rkt pkgs/games/gobblet/robot.rkt pkgs/games/gobblet/check.rkt pkgs/db-pkgs/db-lib/db/private/odbc/main.rkt pkgs/db-pkgs/db-lib/db/private/odbc/ffi.rkt pkgs/db-pkgs/db-lib/db/private/odbc/dbsystem.rkt pkgs/db-pkgs/db-lib/db/private/odbc/connection.rkt pkgs/distributed-places-pkgs/distributed-places-lib/racket/place/distributed/examples/hello-world.rkt pkgs/redex-pkgs/redex-lib/redex/private/compiler/match.rkt pkgs/redex-pkgs/redex-lib/redex/private/compiler/match.rkt pkgs/htdp-pkgs/htdp-test/2htdp/utest/balls.rkt pkgs/gui-pkgs/gui-test/framework/tests/test-suite-utils.rkt pkgs/games/paint-by-numbers/raw-problems/size-calculation.rkt pkgs/db-pkgs/db-lib/db/odbc.rkt pkgs/compatibility-pkgs/compatibility-lib/mzlib/traceld.rkt pkgs/cext-lib/dynext/private/stdio.rkt pkgs/db-pkgs/db-lib/db/odbc.rkt racket/collects/ffi/unsafe/objc.rkt racket/collects/ffi/objc.rkt pkgs/racket-pkgs/racket-test/tests/pkg/tests-db.rkt pkgs/racket-pkgs/racket-test/tests/pkg/test-docs.rkt pkgs/racket-pkgs/racket-test/tests/pkg/test-catalogs-api.rkt pkgs/gui-pkg-manager-pkgs/gui-pkg-manager-lib/pkg/gui/main.rkt pkgs/redex-pkgs/redex-lib/redex/private/compiler/redextomatrix.rkt pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/base-env/base-special-env.rkt pkgs/planet-pkgs/planet-test/tests/planet/version.rkt pkgs/planet-pkgs/planet-test/tests/planet/test-docs-complete.rkt pkgs/planet-pkgs/planet-test/tests/planet/lang.rkt pkgs/planet-pkgs/planet-test/tests/planet/docs-build.rkt pkgs/drracket-pkgs/drracket-test/tests/drracket/follow-log.rkt pkgs/drracket-pkgs/drracket/drracket/private/dock-icon.rkt pkgs/drracket-pkgs/drracket-test/tests/drracket/tool-lib-and-sig.rkt --- pkgs/cext-lib/compiler/commands/ctool.rkt | 2 + .../compiler/commands/exe-dir.rkt | 2 + .../compiler-lib/compiler/commands/exe.rkt | 2 + .../compiler-lib/compiler/commands/make.rkt | 2 + .../compiler-lib/compiler/commands/pack.rkt | 1 + .../compiler/demodularizer/batch.rkt | 2 + .../tests/compiler/embed/embed-me9.rkt | 5 +- .../tests/compiler/embed/info.rkt | 4 + .../tests/compiler/zo-test-worker.rkt | 2 + .../compiler-test/tests/compiler/zo-test.rkt | 6 + .../db-test/tests/db/programs/web-test.rkt | 2 + .../deinprogramm/run-dmda-code.rkt | 2 +- pkgs/distro-build/add-catalog.rkt | 2 + pkgs/distro-build/assemble-site.rkt | 2 + pkgs/distro-build/drive-clients.rkt | 2 + pkgs/distro-build/install-for-docs.rkt | 2 + pkgs/distro-build/install-pkgs.rkt | 2 + pkgs/distro-build/installer.rkt | 2 + pkgs/distro-build/manage-snapshots.rkt | 2 + pkgs/distro-build/pack-and-catalog.rkt | 2 + pkgs/distro-build/pack-built.rkt | 2 + pkgs/distro-build/pack-collects.rkt | 2 + pkgs/distro-build/serve-catalog.rkt | 2 + pkgs/distro-build/set-config.rkt | 2 + pkgs/distro-build/unpack-collects.rkt | 2 + .../drracket-test/tests/drracket/io.rkt | 3 + .../tests/drracket/language-test.rkt | 4 + .../tests/drracket/module-lang-test.rkt | 9 + .../tests/drracket/populate-compiled.rkt | 2 + .../randomly-click-language-dialog.rkt | 2 + .../drracket/randomly-click-preferences.rkt | 2 + .../tests/drracket/repl-test-debug.rkt | 3 + .../tests/drracket/repl-test-debugprofile.rkt | 3 + .../tests/drracket/repl-test-raw.rkt | 3 + .../tests/drracket/snip/info.rkt | 3 + .../tests/drracket/snip/run-collapsed.rkt | 5 + .../tests/drracket/syncheck-test.rkt | 4 + .../tests/drracket/test-engine-test.rkt | 4 + .../drracket-test/tests/jpr/info.rkt | 3 + .../drracket-test/tests/jpr/monte-carlo.ss | 2 + .../drracket/drracket/drracket.rkt | 2 + pkgs/drracket-pkgs/drracket/drracket/main.rkt | 2 + .../drracket/private/drracket-normal.rkt | 2 + .../private/launcher-mred-bootstrap.rkt | 2 + .../private/launcher-mz-bootstrap.rkt | 2 + .../drracket/private/stick-figures.rkt | 2 + .../drracket/drracket/tool-lib.rkt | 2 + .../drracket/drscheme/drscheme.rkt | 1 + pkgs/drracket-pkgs/drracket/drscheme/main.rkt | 1 + .../drracket/drscheme/tool-lib.rkt | 1 + .../scribble/tools/drracket-buttons.rkt | 2 + .../drracket/scribble/tools/html.png | Bin 908 -> 723 bytes .../drracket/scribble/tools/pdf.png | Bin 858 -> 711 bytes .../scribble/tools/private/mk-drs-bitmaps.rkt | 7 + .../drracket/incremental-keybindings.rkt | 2 + .../errortrace-test/tests/errortrace/main.rkt | 3 + pkgs/frtime/animation.rkt | 2 + pkgs/frtime/gui.rkt | 5 +- pkgs/frtime/gui/info.rkt | 1 + pkgs/frtime/info.rkt | 1 + pkgs/games/main.rkt | 5 + pkgs/games/paint-by-numbers/info.rkt | 3 +- pkgs/games/paint-by-numbers/main.rkt | 519 ----- .../raw-problems/build-final.rkt | 2 + .../raw-problems/build-rows-cols.rkt | 2 + pkgs/games/parcheesi/make-bitmap.rkt | 4 +- pkgs/games/parcheesi/parcheesi.png | Bin 521 -> 500 bytes .../embedded-gui/private/tests/info.rkt | 1 + pkgs/gui-pkgs/gui-lib/mred/edit-main.rkt | 2 + .../gui-pkgs/gui-lib/mred/private/wx/info.rkt | 3 + .../private/aligned-pasteboard/tests/info.rkt | 15 + .../gui-test/framework/tests/canvas.rkt | 2 + .../gui-test/framework/tests/debug.rkt | 2 + .../gui-test/framework/tests/exit.rkt | 2 + .../gui-test/framework/tests/frame.rkt | 2 + .../framework/tests/framework-test-engine.rkt | 2 + .../gui-test/framework/tests/group-test.rkt | 2 + .../gui-test/framework/tests/handler-test.rkt | 2 + .../gui-test/framework/tests/keys.rkt | 2 + .../gui-test/framework/tests/load.rkt | 2 + .../gui-test/framework/tests/main.rkt | 4 + .../gui-pkgs/gui-test/framework/tests/mem.rkt | 2 + .../gui-test/framework/tests/panel-single.rkt | 2 + .../gui-test/framework/tests/panel.rkt | 2 + .../gui-test/framework/tests/pasteboard.rkt | 2 + .../gui-test/framework/tests/prefs.rkt | 2 + .../gui-test/framework/tests/search.rkt | 2 + .../gui-test/framework/tests/text.rkt | 2 + pkgs/gui-pkgs/gui-test/tests/gracket/draw.rkt | 5 + pkgs/gui-pkgs/gui-test/tests/gracket/info.rkt | 8 + pkgs/gui-pkgs/gui-test/tests/gracket/item.rkt | 5 + .../tests/gracket/wxme-doc-random.rkt | 169 -- pkgs/htdp-pkgs/htdp-lib/2htdp/info.rkt | 4 + .../htdp-lib/graphics/turtle-test.rkt | 2 + .../htdp-lib/graphics/value-turtles-test.rkt | 2 + pkgs/htdp-pkgs/htdp-lib/htdp/graphing.rkt | 2 + .../htdp-lib/teachpack/htdp/graphing.rkt | 1 + pkgs/htdp-pkgs/htdp-test/2htdp/tests/info.rkt | 16 + .../htdp-test/2htdp/tests/perform-record.rkt | 1831 +++++++++-------- pkgs/htdp-pkgs/htdp-test/2htdp/utest/info.rkt | 4 + pkgs/htdp-pkgs/htdp-test/htdp/tests/info.rkt | 12 + .../htdp-test/tests/stepper/info.rkt | 4 + .../images/tests/effects-tests.rkt | 2 + pkgs/lazy/tests/main.rkt | 3 + .../tests/macro-debugger/all-tests.rkt | 6 + pkgs/main-distribution-test/info.rkt | 1 + .../mzscheme-lib/mzscheme/examples/info.rkt | 3 + pkgs/net-pkgs/net-test/tests/net/main.rkt | 3 + .../net-test/tests/net/websocket/example.rkt | 2 + pkgs/plai/tests/gc/info.rkt | 2 + pkgs/plai/tests/gc/run-test.rkt | 5 + pkgs/plai/tests/gc2/info.rkt | 2 + pkgs/plai/tests/gc2/run-test.rkt | 5 + pkgs/plai/tests/info.rkt | 3 + .../planet-test/tests/planet/cmdline-tool.rkt | 3 + .../planet-test/tests/planet/info.rkt | 1 + .../planet-test/tests/planet/submod.rkt | 2 + .../tests/planet/thread-safe-resolver.rkt | 3 + .../plot/tests/extreme-bounds-tests.rkt | 4 + .../plot-test/plot/tests/slideshow-test.rkt | 2 + pkgs/plt-services/meta/info.rkt | 11 + pkgs/plt-services/meta/props | 505 +---- pkgs/r6rs-pkgs/r6rs-lib/r6rs/run.rkt | 2 + .../tests/racket/benchmarks/common/auto.rkt | 10 +- .../tests/racket/benchmarks/places/info.rkt | 3 + .../tests/racket/benchmarks/rx/auto.rkt | 11 +- .../tests/racket/benchmarks/shootout/info.rkt | 39 + .../tests/racket/benchmarks/shootout/run.rkt | 1 + .../racket/benchmarks/shootout/typed/info.rkt | 66 + .../racket-doc/ffi/examples/info.rkt | 14 + .../racket-test/tests/file/main.rkt | 3 + .../racket-test/tests/pkg/info.rkt | 1 + .../racket-test/tests/pkg/test.rkt | 4 + .../racket-test/tests/pkg/tests-basic.rkt | 2 + .../racket-test/tests/pkg/tests-binary.rkt | 2 + .../racket-test/tests/pkg/tests-catalogs.rkt | 2 + .../racket-test/tests/pkg/tests-checksums.rkt | 2 + .../racket-test/tests/pkg/tests-config.rkt | 2 + .../racket-test/tests/pkg/tests-conflicts.rkt | 2 + .../racket-test/tests/pkg/tests-create.rkt | 2 + .../racket-test/tests/pkg/tests-deps.rkt | 2 + .../racket-test/tests/pkg/tests-failure.rkt | 2 + .../racket-test/tests/pkg/tests-implies.rkt | 2 + .../racket-test/tests/pkg/tests-install.rkt | 2 + .../racket-test/tests/pkg/tests-locking.rkt | 2 + .../tests/pkg/tests-main-server.rkt | 2 + .../racket-test/tests/pkg/tests-migrate.rkt | 2 + .../racket-test/tests/pkg/tests-name.rkt | 2 + .../racket-test/tests/pkg/tests-network.rkt | 2 + .../racket-test/tests/pkg/tests-overwrite.rkt | 2 + .../tests/pkg/tests-permissions.rkt | 2 + .../racket-test/tests/pkg/tests-planet.rkt | 2 + .../racket-test/tests/pkg/tests-platform.rkt | 2 + .../racket-test/tests/pkg/tests-promote.rkt | 2 + .../racket-test/tests/pkg/tests-raco.rkt | 2 + .../racket-test/tests/pkg/tests-remove.rkt | 2 + .../racket-test/tests/pkg/tests-scope.rkt | 2 + .../tests/pkg/tests-update-auto.rkt | 2 + .../tests/pkg/tests-update-deps.rkt | 2 + .../racket-test/tests/pkg/tests-update.rkt | 2 + .../racket-test/tests/pkg/tests-versions.rkt | 2 + .../racket-test/tests/pkg/util.rkt | 3 + .../racket-test/tests/racket/contract/all.rkt | 5 +- .../tests/racket/place-parallel.rkt | 2 +- .../racket-test/tests/racket/stress/fuzz.rkt | 5 + .../racket-test/tests/run-automated-tests.rkt | 3 + .../tests/stxparse/stress-template.rkt | 2 + .../racket-test/tests/xml/test-clark.rkt | 2 + .../rackunit/scribblings/info.rkt | 3 + .../rackunit-test/tests/rackunit/log.rkt | 7 + .../rackunit-test/tests/rackunit/pr10950.rkt | 7 + .../tests/rackunit/run-tests.rkt | 7 + .../tests/rackunit/standalone-check-test.rkt | 4 + .../rackunit/standalone-test-case-test.rkt | 4 + .../tests/rackunit/standalone.rkt | 7 + .../redex/examples/arithmetic.rkt | 6 + .../examples/delim-cont/randomized-tests.rkt | 5 + .../redex-examples/redex/examples/info.rkt | 17 + .../examples/racket-machine/examples.rkt | 6 + pkgs/redex-pkgs/redex-lib/redex/info.rkt | 2 - .../redex-test/redex/tests/bitmap-test.rkt | 2 + .../redex/tests/check-syntax-test.rkt | 2 + .../redex-test/redex/tests/color-test.rkt | 2 + .../redex-test/redex/tests/compiler/info.rkt | 3 + .../redex/tests/core-layout-test.rkt | 2 + .../redex-test/redex/tests/enum-test.rkt | 2 + .../redex-test/redex/tests/hole-test.rkt | 2 + .../redex/tests/keyword-macros-test.rkt | 2 + .../redex-test/redex/tests/matcher-test.rkt | 2 + .../redex-test/redex/tests/pict-test.rkt | 2 + .../redex-test/redex/tests/rg-test.rkt | 2 + .../redex-test/redex/tests/run-tests.rkt | 9 + .../redex-test/redex/tests/stepper-test.rkt | 2 + .../redex-test/redex/tests/term-test.rkt | 2 + .../redex/tests/test-docs-complete.rkt | 1 + .../redex-test/redex/tests/tl-test.rkt | 4 +- pkgs/scribble-pkgs/scribble-lib/help/help.rkt | 2 + .../scribble-lib/scribble/jfp/lang.rkt | 2 + .../scribble-lib/scribble/lncs/lang.rkt | 2 + .../scribble-lib/scribble/run.rkt | 3 +- pkgs/sgl/info.rkt | 1 + pkgs/slatex/pdf-slatex-launcher.rkt | 2 + pkgs/slatex/slatex-launcher.rkt | 2 + .../slideshow-exe/slideshow/info.rkt | 1 + .../slideshow-exe/slideshow/start.rkt | 2 + .../slideshow-plugin/texpict/face-demo.rkt | 2 + .../tests/typed-racket/info.rkt | 4 + .../tests/typed-racket/nightly-run.rkt | 3 + .../typed-racket/optimizer/transform.rkt | 3 + .../tests/typed-racket/run.rkt | 8 + .../tests/typed-racket/succeed/submodules.rkt | 5 + .../scribblings/tutorial/examples/info.rkt | 3 + ...ons.rkt => english-measure-questions.rktd} | 0 .../htdocs/servlets/examples/info.rkt | 9 + .../htdocs/servlets/examples/quiz.rkt | 2 +- .../web-server-lib/web-server/info.rkt | 4 +- .../web-server-lib/web-server/main.rkt | 2 + .../tests/web-server/pr/info.rkt | 4 + .../tests/web-server/servlet-env/env.rkt | 2 + .../tests/web-server/servlet-env/insta.rkt | 2 + .../tests/web-server/stress/info.rkt | 3 + .../tests/web-server/template/info.rkt | 3 + .../xrepl-test/tests/xrepl/known-module.rkt | 1 + .../xrepl-test/tests/xrepl/main.rkt | 3 + .../xrepl-test/tests/xrepl/wrapped-output.rkt | 1 + .../xrepl-test/tests/xrepl/xrepl.rkt | 3 + racket/collects/raco/main.rkt | 2 + racket/collects/raco/raco.rkt | 2 + racket/collects/setup/main.rkt | 2 + racket/collects/setup/setup-go.rkt | 2 + racket/collects/setup/unixstyle-install.rkt | 2 + racket/collects/setup/winstrip.rkt | 2 + racket/collects/setup/winvers.rkt | 2 + 233 files changed, 1758 insertions(+), 2063 deletions(-) create mode 100644 pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/info.rkt create mode 100644 pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/run-collapsed.rkt create mode 100644 pkgs/drracket-pkgs/drracket-test/tests/jpr/info.rkt delete mode 100644 pkgs/games/paint-by-numbers/main.rkt create mode 100644 pkgs/gui-pkgs/gui-lib/mred/private/wx/info.rkt create mode 100644 pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/info.rkt create mode 100644 pkgs/gui-pkgs/gui-test/tests/gracket/info.rkt delete mode 100644 pkgs/gui-pkgs/gui-test/tests/gracket/wxme-doc-random.rkt create mode 100644 pkgs/htdp-pkgs/htdp-test/2htdp/tests/info.rkt create mode 100644 pkgs/htdp-pkgs/htdp-test/2htdp/utest/info.rkt create mode 100644 pkgs/htdp-pkgs/htdp-test/htdp/tests/info.rkt create mode 100644 pkgs/htdp-pkgs/htdp-test/tests/stepper/info.rkt create mode 100644 pkgs/mzscheme-pkgs/mzscheme-lib/mzscheme/examples/info.rkt create mode 100644 pkgs/plai/tests/info.rkt create mode 100644 pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/places/info.rkt create mode 100644 pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/info.rkt create mode 100644 pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/info.rkt create mode 100644 pkgs/racket-pkgs/racket-doc/ffi/examples/info.rkt create mode 100644 pkgs/rackunit-pkgs/rackunit-doc/rackunit/scribblings/info.rkt create mode 100644 pkgs/redex-pkgs/redex-test/redex/tests/compiler/info.rkt create mode 100644 pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/info.rkt create mode 100644 pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/info.rkt rename pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/{english-measure-questions.rkt => english-measure-questions.rktd} (100%) create mode 100644 pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/info.rkt create mode 100644 pkgs/web-server-pkgs/web-server-test/tests/web-server/pr/info.rkt create mode 100644 pkgs/web-server-pkgs/web-server-test/tests/web-server/stress/info.rkt create mode 100644 pkgs/web-server-pkgs/web-server-test/tests/web-server/template/info.rkt diff --git a/pkgs/cext-lib/compiler/commands/ctool.rkt b/pkgs/cext-lib/compiler/commands/ctool.rkt index a3968d76da..77b35da5c7 100644 --- a/pkgs/cext-lib/compiler/commands/ctool.rkt +++ b/pkgs/cext-lib/compiler/commands/ctool.rkt @@ -1,5 +1,7 @@ #lang scheme/base +(module test racket/base) + ;; On error, exit with 1 status code (error-escape-handler (lambda () (exit 1))) diff --git a/pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe-dir.rkt b/pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe-dir.rkt index dae09d1438..acc3b94919 100644 --- a/pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe-dir.rkt +++ b/pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe-dir.rkt @@ -29,3 +29,5 @@ #:copy-collects (exe-dir-add-collects-dirs)) (when (verbose) (printf " [output to \"~a\"]\n" dest-dir)) + +(module test racket/base) diff --git a/pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe.rkt b/pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe.rkt index e1241b11f1..305879651f 100644 --- a/pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe.rkt +++ b/pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe.rkt @@ -140,3 +140,5 @@ (exe-aux)))]) (when (verbose) (printf " [output to \"~a\"]\n" dest))) + +(module test racket/base) diff --git a/pkgs/compiler-pkgs/compiler-lib/compiler/commands/make.rkt b/pkgs/compiler-pkgs/compiler-lib/compiler/commands/make.rkt index b998b0e7c8..74fd5ff6ce 100644 --- a/pkgs/compiler-pkgs/compiler-lib/compiler/commands/make.rkt +++ b/pkgs/compiler-pkgs/compiler-lib/compiler/commands/make.rkt @@ -7,6 +7,8 @@ setup/parallel-build racket/match) +(module test racket/base) + (define verbose (make-parameter #f)) (define very-verbose (make-parameter #f)) (define disable-inlining (make-parameter #f)) diff --git a/pkgs/compiler-pkgs/compiler-lib/compiler/commands/pack.rkt b/pkgs/compiler-pkgs/compiler-lib/compiler/commands/pack.rkt index eba5bf0865..ebb56ae73a 100644 --- a/pkgs/compiler-pkgs/compiler-lib/compiler/commands/pack.rkt +++ b/pkgs/compiler-pkgs/compiler-lib/compiler/commands/pack.rkt @@ -96,3 +96,4 @@ (when (verbose) (printf " [output to \"~a\"]\n" plt-output)))) +(module test racket/base) diff --git a/pkgs/compiler-pkgs/compiler-lib/compiler/demodularizer/batch.rkt b/pkgs/compiler-pkgs/compiler-lib/compiler/demodularizer/batch.rkt index 6ec08d76ec..456ded38e7 100644 --- a/pkgs/compiler-pkgs/compiler-lib/compiler/demodularizer/batch.rkt +++ b/pkgs/compiler-pkgs/compiler-lib/compiler/demodularizer/batch.rkt @@ -57,3 +57,5 @@ Here's the idea: (garbage-collect-toplevels-enabled #t)] #:args (filename) (demodularize filename (output-file)))) + +(module test racket/base) diff --git a/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-me9.rkt b/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-me9.rkt index 877eed97de..cdb4847278 100644 --- a/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-me9.rkt +++ b/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-me9.rkt @@ -3,4 +3,7 @@ (with-output-to-file "stdout" (lambda () (printf "~a\n" (ex))) - 'append)) + 'append) + + (module test racket/base)) + diff --git a/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/info.rkt b/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/info.rkt index 7882f9f179..538a0e0b38 100644 --- a/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/info.rkt +++ b/pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/info.rkt @@ -12,3 +12,7 @@ "embed-isl.rkt" "embed-isll.rkt" "embed-asl.rkt")) + +(define test-omit-paths '("embed-me9.rkt" + "embed-planet-1" + "embed-planet-2")) diff --git a/pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test-worker.rkt b/pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test-worker.rkt index e46284548d..8be85d8121 100644 --- a/pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test-worker.rkt +++ b/pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test-worker.rkt @@ -268,3 +268,5 @@ (command-line #:program "zo-test-worker" #:args (file) (run-test file)) + +(module test racket/base) diff --git a/pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test.rkt b/pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test.rkt index 20158c5404..6bd475bbaa 100755 --- a/pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test.rkt +++ b/pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test.rkt @@ -227,3 +227,9 @@ exec racket -t "$0" -- -s -t 60 -v -R $* (printf "~a:\n~a\n\n" (car p) (cdr p))))))))) (thread-wait final-thread) + +;; Test mode: +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments (vector "-I" "-S" "-t" "60" "-v" "-R")]) + (dynamic-require (quote-module-path "..") #f))) diff --git a/pkgs/db-pkgs/db-test/tests/db/programs/web-test.rkt b/pkgs/db-pkgs/db-test/tests/db/programs/web-test.rkt index 52aae46ac2..1a3b413b65 100644 --- a/pkgs/db-pkgs/db-test/tests/db/programs/web-test.rkt +++ b/pkgs/db-pkgs/db-test/tests/db/programs/web-test.rkt @@ -7,6 +7,8 @@ racket/port db) +(module test racket/base) + #| This program tests the combination of virtual connections and connection pools in the context of web servlets, where servlet threads diff --git a/pkgs/deinprogramm/deinprogramm/run-dmda-code.rkt b/pkgs/deinprogramm/deinprogramm/run-dmda-code.rkt index 9bbb0825ad..54b8438be3 100644 --- a/pkgs/deinprogramm/deinprogramm/run-dmda-code.rkt +++ b/pkgs/deinprogramm/deinprogramm/run-dmda-code.rkt @@ -51,4 +51,4 @@ (run-dmda-file (vector-ref (current-command-line-arguments) 0)) - ) + (module test racket/base)) diff --git a/pkgs/distro-build/add-catalog.rkt b/pkgs/distro-build/add-catalog.rkt index 977276b687..35c6e08bb7 100644 --- a/pkgs/distro-build/add-catalog.rkt +++ b/pkgs/distro-build/add-catalog.rkt @@ -4,6 +4,8 @@ pkg/lib net/url) +(module test racket/base) + (define (add-catalog! url) (define s (url->string url)) (define l (pkg-config-catalogs)) diff --git a/pkgs/distro-build/assemble-site.rkt b/pkgs/distro-build/assemble-site.rkt index 4d873d700e..0aed49284a 100644 --- a/pkgs/distro-build/assemble-site.rkt +++ b/pkgs/distro-build/assemble-site.rkt @@ -5,6 +5,8 @@ "download-page.rkt" (only-in "config.rkt" extract-options)) +(module test racket/base) + (define build-dir (build-path "build")) (define built-dir (build-path build-dir "built")) diff --git a/pkgs/distro-build/drive-clients.rkt b/pkgs/distro-build/drive-clients.rkt index c9d5ffa17e..0e3795399d 100644 --- a/pkgs/distro-build/drive-clients.rkt +++ b/pkgs/distro-build/drive-clients.rkt @@ -18,6 +18,8 @@ ;; See "config.rkt" for an overview. +(module test racket/base) + ;; ---------------------------------------- (define default-release? #f) diff --git a/pkgs/distro-build/install-for-docs.rkt b/pkgs/distro-build/install-for-docs.rkt index aaf47a670f..e672e1ca52 100644 --- a/pkgs/distro-build/install-for-docs.rkt +++ b/pkgs/distro-build/install-for-docs.rkt @@ -7,6 +7,8 @@ (only-in "config.rkt" extract-options) "display-time.rkt") +(module test racket/base) + (define-values (dir config-file config-mode default-pkgs catalogs) (command-line #:args diff --git a/pkgs/distro-build/install-pkgs.rkt b/pkgs/distro-build/install-pkgs.rkt index 3f661d2117..f7150e890d 100644 --- a/pkgs/distro-build/install-pkgs.rkt +++ b/pkgs/distro-build/install-pkgs.rkt @@ -3,6 +3,8 @@ racket/string (only-in "config.rkt" extract-options)) +(module test racket/base) + (define-values (config-file config-mode default-pkgs flags) (command-line #:args diff --git a/pkgs/distro-build/installer.rkt b/pkgs/distro-build/installer.rkt index 17fe981be5..82bb622116 100644 --- a/pkgs/distro-build/installer.rkt +++ b/pkgs/distro-build/installer.rkt @@ -11,6 +11,8 @@ racket/port "display-time.rkt") +(module test racket/base) + (define release? #f) (define source? #f) (define mac-pkg? #f) diff --git a/pkgs/distro-build/manage-snapshots.rkt b/pkgs/distro-build/manage-snapshots.rkt index 1adcb18a1e..18b5daef3d 100644 --- a/pkgs/distro-build/manage-snapshots.rkt +++ b/pkgs/distro-build/manage-snapshots.rkt @@ -5,6 +5,8 @@ "download-page.rkt" (only-in "config.rkt" extract-options)) +(module test racket/base) + (define build-dir (build-path "build")) (define installers-dir (build-path "installers")) diff --git a/pkgs/distro-build/pack-and-catalog.rkt b/pkgs/distro-build/pack-and-catalog.rkt index dba59b847d..7d1b45611e 100644 --- a/pkgs/distro-build/pack-and-catalog.rkt +++ b/pkgs/distro-build/pack-and-catalog.rkt @@ -11,6 +11,8 @@ pkg/lib setup/getinfo) +(module test racket/base) + (define pack-dest-dir #f) (define catalog-dirs null) (define native? #f) diff --git a/pkgs/distro-build/pack-built.rkt b/pkgs/distro-build/pack-built.rkt index 70d2528f83..8cfa45bee4 100644 --- a/pkgs/distro-build/pack-built.rkt +++ b/pkgs/distro-build/pack-built.rkt @@ -8,6 +8,8 @@ openssl/sha1 racket/cmdline) +(module test racket/base) + (define create-mode 'built) (command-line diff --git a/pkgs/distro-build/pack-collects.rkt b/pkgs/distro-build/pack-collects.rkt index 6078a4fb2d..a7f9ecb3ff 100644 --- a/pkgs/distro-build/pack-collects.rkt +++ b/pkgs/distro-build/pack-collects.rkt @@ -3,6 +3,8 @@ file/gzip racket/file) +(module test racket/base) + (define origin-dir (build-path "build" "origin")) (make-directory* origin-dir) diff --git a/pkgs/distro-build/serve-catalog.rkt b/pkgs/distro-build/serve-catalog.rkt index 71844c99a3..b560aa72e1 100644 --- a/pkgs/distro-build/serve-catalog.rkt +++ b/pkgs/distro-build/serve-catalog.rkt @@ -15,6 +15,8 @@ (only-in "config.rkt" extract-options) "readme.rkt") +(module test racket/base) + (define from-dir "built") (define-values (config-file config-mode diff --git a/pkgs/distro-build/set-config.rkt b/pkgs/distro-build/set-config.rkt index d98d65b99b..233c6be363 100644 --- a/pkgs/distro-build/set-config.rkt +++ b/pkgs/distro-build/set-config.rkt @@ -5,6 +5,8 @@ (only-in "config.rkt" extract-options) "url-options.rkt") +(module test racket/base) + (define-values (dest-config-file config-file config-mode install-name build-stamp default-doc-search default-catalogs) diff --git a/pkgs/distro-build/unpack-collects.rkt b/pkgs/distro-build/unpack-collects.rkt index bc9dbd45b8..7b481b6764 100644 --- a/pkgs/distro-build/unpack-collects.rkt +++ b/pkgs/distro-build/unpack-collects.rkt @@ -6,6 +6,8 @@ file/untgz "display-time.rkt") +(module test racket/base) + (define dest-dir "bundle/racket") (define server diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/io.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/io.rkt index 7c7f467bcf..8dd13c8933 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/io.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/io.rkt @@ -209,3 +209,6 @@ add this test: ;;(long-io/execute-test) (reading-test))) +(module+ test + (module config info + (define timeout 500))) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/language-test.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/language-test.rkt index 29926c15d1..7e22bce36d 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/language-test.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/language-test.rkt @@ -1517,3 +1517,7 @@ the settings above should match r5rs ) (fire-up-drracket-and-run-tests run-test) + +(module+ test + (module config info + (define timeout 1500))) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/module-lang-test.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/module-lang-test.rkt index 546aa8645a..9c244bea89 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/module-lang-test.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/module-lang-test.rkt @@ -420,3 +420,12 @@ "0") (fire-up-drracket-and-run-tests run-test) + +;; Test mode: +(module test racket/base + (require syntax/location) + (putenv "PLTDRTEST" "yes") + (eval-jit-enabled #f) + (dynamic-require (quote-module-path "..") #f) + (module config info + (define timeout 800))) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/populate-compiled.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/populate-compiled.rkt index 85e68d52d6..ff57fc3706 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/populate-compiled.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/populate-compiled.rkt @@ -4,6 +4,8 @@ compiler/find-exe pkg/lib) +(module test racket/base) ; disable for DrDr + (unless (eq? 'user (default-pkg-scope)) (error "Run this test with `user' default package scope")) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-language-dialog.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-language-dialog.rkt index 410b1d9850..3a761335e5 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-language-dialog.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-language-dialog.rkt @@ -1,3 +1,5 @@ #lang racket/base (require "private/randomly-click.rkt") (go 'language-dialog) + +(module test racket/base) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-preferences.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-preferences.rkt index 35e25eb2a8..d019c09769 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-preferences.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-preferences.rkt @@ -1,3 +1,5 @@ #lang racket/base (require "private/randomly-click.rkt") (go 'preferences-dialog) + +(module test racket/base) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debug.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debug.rkt index da254d1a6d..7e8e44e331 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debug.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debug.rkt @@ -2,3 +2,6 @@ (require "private/repl-test.rkt" "private/drracket-test-util.rkt") (fire-up-drracket-and-run-tests (λ () (run-test '(debug)))) +(module+ test + (module config info + (define timeout 300))) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debugprofile.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debugprofile.rkt index 84aa81aa4f..73a290071a 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debugprofile.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debugprofile.rkt @@ -2,3 +2,6 @@ (require "private/repl-test.rkt" "private/drracket-test-util.rkt") (fire-up-drracket-and-run-tests (λ () (run-test '(debug/profile)))) +(module+ test + (module config info + (define timeout 300))) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-raw.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-raw.rkt index e0b7789e3e..df58fa5cce 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-raw.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-raw.rkt @@ -2,3 +2,6 @@ (require "private/repl-test.rkt" "private/drracket-test-util.rkt") (fire-up-drracket-and-run-tests (λ () (run-test '(raw)))) +(module+ test + (module config info + (define timeout 300))) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/info.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/info.rkt new file mode 100644 index 0000000000..2cc324cea6 --- /dev/null +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-omit-paths '("collapsed.rkt")) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/run-collapsed.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/run-collapsed.rkt new file mode 100644 index 0000000000..2b840517e6 --- /dev/null +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/run-collapsed.rkt @@ -0,0 +1,5 @@ +#lang racket/base +(require racket/gui/base) + +;; Using `racket/gui/base` installs the right load handler: +(dynamic-require "collapsed.rkt" 0) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/syncheck-test.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/syncheck-test.rkt index a4438af057..d59e68e7cd 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/syncheck-test.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/syncheck-test.rkt @@ -1665,3 +1665,7 @@ (test:run-one (lambda () (send (send drs syncheck:get-button) command)))) (main) + +(module+ test + (module config info + (define timeout 200))) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/drracket/test-engine-test.rkt b/pkgs/drracket-pkgs/drracket-test/tests/drracket/test-engine-test.rkt index 8aed7f5f1c..a2a8f574e8 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/drracket/test-engine-test.rkt +++ b/pkgs/drracket-pkgs/drracket-test/tests/drracket/test-engine-test.rkt @@ -519,3 +519,7 @@ (go test-disabling-tests)) (fire-up-drracket-and-run-tests run-test) + +(module+ test + (module config info + (define timeout 480))) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/jpr/info.rkt b/pkgs/drracket-pkgs/drracket-test/tests/jpr/info.rkt new file mode 100644 index 0000000000..11dda9e487 --- /dev/null +++ b/pkgs/drracket-pkgs/drracket-test/tests/jpr/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-skip-paths '("balle-grav-frot.ss")) diff --git a/pkgs/drracket-pkgs/drracket-test/tests/jpr/monte-carlo.ss b/pkgs/drracket-pkgs/drracket-test/tests/jpr/monte-carlo.ss index 3a69e98bef..a8010ee705 100644 --- a/pkgs/drracket-pkgs/drracket-test/tests/jpr/monte-carlo.ss +++ b/pkgs/drracket-pkgs/drracket-test/tests/jpr/monte-carlo.ss @@ -49,3 +49,5 @@ (send CANVAS on-paint))))) (send FRAME show #t) + +(module test racket/base) diff --git a/pkgs/drracket-pkgs/drracket/drracket/drracket.rkt b/pkgs/drracket-pkgs/drracket/drracket/drracket.rkt index f11634b1c4..2adf3e99b9 100644 --- a/pkgs/drracket-pkgs/drracket/drracket/drracket.rkt +++ b/pkgs/drracket-pkgs/drracket/drracket/drracket.rkt @@ -1,6 +1,8 @@ #lang racket/base (require racket/gui/base "private/key.rkt") +(module test racket/base) + (define debugging? (getenv "PLTDRDEBUG")) (define profiling? (getenv "PLTDRPROFILE")) diff --git a/pkgs/drracket-pkgs/drracket/drracket/main.rkt b/pkgs/drracket-pkgs/drracket/drracket/main.rkt index 1092b93c17..b86a29bd96 100644 --- a/pkgs/drracket-pkgs/drracket/drracket/main.rkt +++ b/pkgs/drracket-pkgs/drracket/drracket/main.rkt @@ -1,2 +1,4 @@ #lang racket/base (require "drracket.rkt") + +(module test racket/base) \ No newline at end of file diff --git a/pkgs/drracket-pkgs/drracket/drracket/private/drracket-normal.rkt b/pkgs/drracket-pkgs/drracket/drracket/private/drracket-normal.rkt index 927d243b10..911f1a87f3 100644 --- a/pkgs/drracket-pkgs/drracket/drracket/private/drracket-normal.rkt +++ b/pkgs/drracket-pkgs/drracket/drracket/private/drracket-normal.rkt @@ -12,6 +12,8 @@ "frame-icon.rkt" "eb.rkt") +(module test racket/base) + (define-runtime-path doc-icon.rkt "dock-icon.rkt") (define files-to-open (command-line #:args filenames filenames)) diff --git a/pkgs/drracket-pkgs/drracket/drracket/private/launcher-mred-bootstrap.rkt b/pkgs/drracket-pkgs/drracket/drracket/private/launcher-mred-bootstrap.rkt index 25f072dc6d..b4e50b8bd8 100644 --- a/pkgs/drracket-pkgs/drracket/drracket/private/launcher-mred-bootstrap.rkt +++ b/pkgs/drracket-pkgs/drracket/drracket/private/launcher-mred-bootstrap.rkt @@ -1,5 +1,7 @@ #lang racket/base +(module test racket/base) + (require racket/gui/base "launcher-bootstrap.rkt") (current-namespace (make-gui-empty-namespace)) diff --git a/pkgs/drracket-pkgs/drracket/drracket/private/launcher-mz-bootstrap.rkt b/pkgs/drracket-pkgs/drracket/drracket/private/launcher-mz-bootstrap.rkt index 9a4b0d750b..cce65b567b 100644 --- a/pkgs/drracket-pkgs/drracket/drracket/private/launcher-mz-bootstrap.rkt +++ b/pkgs/drracket-pkgs/drracket/drracket/private/launcher-mz-bootstrap.rkt @@ -1,5 +1,7 @@ #lang racket/base +(module test racket/base) + (require "launcher-bootstrap.rkt") (current-namespace (make-base-empty-namespace)) diff --git a/pkgs/drracket-pkgs/drracket/drracket/private/stick-figures.rkt b/pkgs/drracket-pkgs/drracket/drracket/private/stick-figures.rkt index 987f94367f..0af8db8b5f 100644 --- a/pkgs/drracket-pkgs/drracket/drracket/private/stick-figures.rkt +++ b/pkgs/drracket-pkgs/drracket/drracket/private/stick-figures.rkt @@ -2,6 +2,8 @@ (require racket/class racket/pretty racket/gui/base) + + (module test racket/base) (define head-size 40) (define small-bitmap-factor 1/2) diff --git a/pkgs/drracket-pkgs/drracket/drracket/tool-lib.rkt b/pkgs/drracket-pkgs/drracket/drracket/tool-lib.rkt index c5fc08443c..2ed0820c6c 100644 --- a/pkgs/drracket-pkgs/drracket/drracket/tool-lib.rkt +++ b/pkgs/drracket-pkgs/drracket/drracket/tool-lib.rkt @@ -6,6 +6,8 @@ the main unit, starting up DrRacket. After that, it just provides all of the names in the tools library, for use defining keybindings |# +(module test racket/base) + (require racket/class racket/gui/base racket/unit diff --git a/pkgs/drracket-pkgs/drracket/drscheme/drscheme.rkt b/pkgs/drracket-pkgs/drracket/drscheme/drscheme.rkt index ed77a6e4e7..b5745267ac 100644 --- a/pkgs/drracket-pkgs/drracket/drscheme/drscheme.rkt +++ b/pkgs/drracket-pkgs/drracket/drscheme/drscheme.rkt @@ -1,2 +1,3 @@ #lang racket/base (require drracket/drracket) +(module test racket/base) diff --git a/pkgs/drracket-pkgs/drracket/drscheme/main.rkt b/pkgs/drracket-pkgs/drracket/drscheme/main.rkt index df232bf615..afa5740b3a 100644 --- a/pkgs/drracket-pkgs/drracket/drscheme/main.rkt +++ b/pkgs/drracket-pkgs/drracket/drscheme/main.rkt @@ -1,2 +1,3 @@ #lang racket/base (require "drscheme.rkt") +(module test racket/base) diff --git a/pkgs/drracket-pkgs/drracket/drscheme/tool-lib.rkt b/pkgs/drracket-pkgs/drracket/drscheme/tool-lib.rkt index 4b4a1c3cfe..ff617d01a4 100644 --- a/pkgs/drracket-pkgs/drracket/drscheme/tool-lib.rkt +++ b/pkgs/drracket-pkgs/drracket/drscheme/tool-lib.rkt @@ -1,3 +1,4 @@ #lang racket/base (require drracket/tool-lib) (provide (all-from-out drracket/tool-lib)) +(module test racket/base) \ No newline at end of file diff --git a/pkgs/drracket-pkgs/drracket/scribble/tools/drracket-buttons.rkt b/pkgs/drracket-pkgs/drracket/scribble/tools/drracket-buttons.rkt index ad531d8147..10312b108a 100644 --- a/pkgs/drracket-pkgs/drracket/scribble/tools/drracket-buttons.rkt +++ b/pkgs/drracket-pkgs/drracket/scribble/tools/drracket-buttons.rkt @@ -10,6 +10,8 @@ (provide drracket-buttons) +(module test racket/base) + (define-runtime-path pdf-png-path "pdf.png") (define-runtime-path html-png-path "html.png") (define pdf.png (make-object bitmap% pdf-png-path 'png/mask)) diff --git a/pkgs/drracket-pkgs/drracket/scribble/tools/html.png b/pkgs/drracket-pkgs/drracket/scribble/tools/html.png index ce3980b13b70014de705c1d85ccd2b65ed1836e9..24d8d99f5861d5f7baca0c7ff362dfb74f2329e6 100644 GIT binary patch delta 700 zcmV;t0z>_b2h#E|gW*HSun{I7WnQmuI=k}d_XWMsv zy4pca6nfx=kN10?_xpJsovNzXPCy9l!*M*X*XxDt_V;Yp6n_N45e|p%0stHcAr`|h zoFIq<$8r5utMvgv5UUzlRn<)ui9~L@T&`Rw6uJ)paLBS;f)JvU$>e#T&-dEn@k9%S zg1N}wB#y`99d5UKJ(WtGQdJcbMbVZ_CR-&*DwQOOLI{=n{r+du)6?&Y8tn;^B+MlTD_ z@@pXj&6bVgI9`ay<6SgOdy6_sa}#K zBRtP{Du0S%U|Dw1U@)v`IavBwXnWrVzP>q~2`o=#+q~{Cfr%FZk01#38!Z+^(Hf0L zd%Rw6D3{9}EcSJSEnvppPQ0=-6GN_^>_GENW9teC-{5(^Q>W7*k|Y;%xm<-T%cW+s z`K{eX2W9U2-sx#i(@Jb?)IISqkRYC~0EbGxip)gy_Yp-jwW8gWV0ZQD% zU-*v@#uzB2@_*9O(rw$eqpGTYl}@K$$>nmVi^byG0EjHhH#cwCQ})%k);67(daPV+ zoFCmV*4Z8b05nZ|)wb=Z*XvzRrBcW9`TRS%TyCy=+Gc&Ka&{DgAo!^5?wI+lzI`9I z-rN2yY;gcksZ^c^fOtH94gksL^QQnHnM}?O2M%;VHgw6HVtqbXZ8DH-#(O-7Q{Z+vQ`wd%e?=w3+zO2x&#u~ z_5lC~fKW;$0O;xIsXC4mvG4j(`#fP^dfL41G??=6TC9+l}v$w?*V$}0y>c}|+VJ`Mn~EZ^t=AW70608p>j zCuLc_$@?kwPgaq;-L6#6L^i+!@Tw)PRF)IT^lcs>$|TT(=sQA&LPNXL)y@$rL!K;YT~GIb!vhC4FxnQ_iwTTixH ztqi4976hU0^ZEV^hr^4is($J9de^%KGRC^yHeBWJi|u2(XaCp#0U3h7zDfo@nE(I) M07*qoM6N<$f;XnP$p8QV diff --git a/pkgs/drracket-pkgs/drracket/scribble/tools/pdf.png b/pkgs/drracket-pkgs/drracket/scribble/tools/pdf.png index 8e88aac1c8ab31ab66def56bb4554640da13fecc..4494e71d2e0e1a150e95b550c567155cc083b47d 100644 GIT binary patch delta 688 zcmV;h0#E(g2FC@EBYy&pNklUvM%{#`(RYg&Z7K>%c>2%)n`F!gY9jp|&T&|0v zDABq{n51na`OZxZx4JWP@JoGAS!rA^6bkJ;&ri}c9sT)3s|KPdc9_lPw~`;1wAsdSoCiWE#pCg7EX%G`bQ(ekkP$IW_vKa#nNmy7NZkddrM$B``(e@6X_!+~ zh1Kizv1~TmZ8Dhx2%$EY%XP|RGQF=F%nuZ1>JMwZQv0Xg=$P%`#aTf>2(_kCsnb@g zb(*H>NPi-c=vP(M!1Mfs!C=^~iEwnxcq2N6FXhLbX{Iv+0)fB;Aw+Mt+aE9t^ASQQ zaUAyw06^B()|SiV^1hk~002;ksrH5IXzIuv{cz3_J(ox%`ZXF2rfK?fsZ?rI6onB4 z;dxV2(`}ljBfD;5ep|7BUBtbWzE~_e(&_XGgeg$7s;cnUttEu~c)`B{{+;rl4ZZ{W W{d6&iR^BxL0000feUHYB*9 zwu(mEqL)Gs>P3q+Dk90H22_f8s3OkU8t!9XK)k+)bk$h;t6k zIcl}qL+Nz7H9I@Y=jZ3oTbA`8V@zT$mu=g=E&Wd6;$%;q&+IAkYPGt*%?SWNDGg;Z znNy50#W0Mi!GFQQ5zDeh&Q1Mj&FnOurx{^#LNAvmop=>sL7!gNPO+7efxZqeMfVb#h{1ufsJYW8(4rj#|y!VLu zq9DU7et!_}jihWd`Lyz(WmzKt5DJAZ0e}Pmnx-w(>-AmL<;LT42SbM_Gtl@-xTW`m zGrawi-@h(gsfO6hbxuJ0Z|lf!!Tw#Ln;=FO(7u(zE@9%#pkw|>pDY2`o>wi-|L}VKOGcT@IR~XwX*QcX za=F~Z;^N}THp4l;;R|~fFa0)EJaX$6&r)DaEHnSsmP08G03hvu3=Iw47Y>K#Za5PF zcs-uCDR;RtzVL=L7JZ^12{Ah$Nzz&%5coyc_3sSBIH{`Y%74D`|Kx8jE|W3nsp}*F O0000vector (map list->vector (car (cddddr state)))))]) - (editor problem))] - [(player) - (let ([name (cadr state)] - [problem - (make-problem name - (caddr state) - (cadddr state) - (car (cddddr state)))]) - (player problem (cadr (cddddr state))))] - [else - (message-box "Error" - (format "Unknown save file ~a" fn))])))))] - - [edit-menu:undo - (lambda (_1 _2) - (send (get-canvas) undo))] - - [edit-menu:redo - (lambda (_1 _2) - (send (get-canvas) redo))]) - - (sequence - (super-init name)) - (public - [top-panel (make-object horizontal-panel% (get-area-container))] - [help-button - (make-object button% "Help" top-panel (lambda (_1 _2) (show-help)))]) - (sequence - (send top-panel stretchable-height #f) - (send top-panel set-alignment 'right 'center)))) - - (define pbn-frame% - (class generic-frame% ([_problem (car problems)]) - - (private - [problem _problem]) - - (inherit get-pbn-filename) - (override - [do-save - (lambda () - (call-with-output-file (get-pbn-filename) - (lambda (port) - (pretty-print - (list 'player - (problem-name problem) - (problem-rows problem) - (problem-cols problem) - (problem-solution problem) - (send canvas get-grid)) - port)) - 'truncate - 'text))]) - - (inherit can-close? show) - - (inherit stretchable-width stretchable-height update-filename) - (private - [set-problem - (lambda (prlmb) - (update-filename #f) - (send wrong-item enable (problem-solution prlmb)) - (send editor-item enable (problem-solution prlmb)) - (let ([rows (problem-rows prlmb)] - [cols (problem-cols prlmb)]) - (set! problem prlmb) - (when canvas (send canvas close-up)) - (set! canvas (make-object GUI:paint-by-numbers-canvas% canvas-panel rows cols)) - (send canvas-panel change-children (lambda (l) (list canvas)))) - (stretchable-width #f) - (stretchable-height #f))] - - [show-wrong - (lambda () - (let loop ([i (length (problem-cols problem))]) - (unless (zero? i) - (let loop ([j (length (problem-rows problem))]) - (unless (zero? j) - (let* ([m (- i 1)] - [n (- j 1)] - [board-entry (get-entry m n)] - [real-answer (vector-ref (vector-ref (problem-solution problem) m) n)]) - (unless (or (eq? board-entry real-answer) - (eq? board-entry 'unknown) - (eq? real-answer 'unknown)) - (send canvas set-to-error m n))) - (loop (- j 1)))) - (loop (- i 1)))))] - - [get-entry - (lambda (i j) - (send canvas get-rect i j))] - - [set-entry - (lambda (i j nv) - (send canvas set-rect i j nv) - (send canvas paint-rect i j))] - - [really-solve? - (lambda () - (fw:gui-utils:get-choice - (format "~ - Solving can be a very computationally intense task;~ -\nyou may run out of memory and crash. ~ -\nReally continue? (Be sure to save your work!)") - "Yes" - "No" - "Really Solve?" - #f))] - - [solve - (lambda () - (when (really-solve?) - (send canvas all-unknown) - (send canvas on-paint) - (SOLVE:solve - (problem-rows problem) - (problem-cols problem) - set-entry - setup-progress)))]) - - (sequence - (super-init game-name)) - - (private - [wrong-item #f] - [solve-item #f] - [editor-item #f]) - (inherit get-menu-bar) - (sequence - (let* ([mb (get-menu-bar)] - [pbn-menu (make-object menu% "Nonogram" mb)]) - (set! solve-item (make-object menu-item% "Solve" pbn-menu - (lambda (_1 _2) - (solve)) - #\l)) - (set! wrong-item (make-object menu-item% "Show Mistakes" pbn-menu - (lambda (_1 _2) - (show-wrong)) #\h)) - (set! editor-item (make-object menu-item% "Edit this Puzzle" pbn-menu - (lambda (_1 _2) - (editor problem)))) - - (make-object separator-menu-item% pbn-menu) - (add-font-items this pbn-menu))) - - (inherit top-panel help-button get-area-container) - (private - [gap (make-object horizontal-panel% top-panel)] - [set-choice - (make-object choice% - "Set" - all:set-names - top-panel - (lambda (choice evt) - (set! problems (list-ref all:problemss (send choice get-selection))) - (send board-choice clear) - (for-each (lambda (problem) (send board-choice append (problem-name problem))) - problems) - (set-problem (car problems))))] - [board-choice (make-object choice% - "Board" - (map problem-name problems) - top-panel - (lambda (choice evt) - (set-problem (list-ref problems (send choice get-selection)))))] - [canvas/spacer-panel (make-object horizontal-panel% (get-area-container))] - [canvas-panel (make-object vertical-pane% canvas/spacer-panel)] - [spacer (make-object grow-box-spacer-pane% canvas/spacer-panel)] - [canvas #f]) - (sequence - (send top-panel change-children (lambda (l) (list set-choice board-choice gap help-button)))) - - (override - [get-canvas - (lambda () - canvas)]) - - (rename [super-on-close on-close]) - (override - [on-close - (lambda () - (when canvas (send canvas close-up)))]) - - (sequence - (set-problem problem) - (show #t)))) - - (define editor-frame% - (class generic-frame% (indicator) - (inherit get-pbn-filename) - (override - [do-save - (lambda () - (let ([fn (get-pbn-filename)]) - (call-with-output-file fn - (lambda (port) - (pretty-print - (list 'editor - (let-values ([(base name dir?) (split-path fn)]) - name) - (send canvas get-row-numbers) - (send canvas get-col-numbers) - (let ([grid (send canvas get-grid)]) - (map (lambda (l) (map (lambda (x) (if (eq? x 'on) 'on 'off)) l)) grid))) - port)) - 'truncate - 'text)))]) - - (private - [test-puzzle - (lambda () - (player - (make-problem "" - (send canvas get-row-numbers) - (send canvas get-col-numbers) - (send canvas get-grid))))]) - - (private - [canvas #f]) - (override - [get-canvas - (lambda () - canvas)]) - - - (rename [super-on-close on-close]) - (override - [on-close - (lambda () - (when canvas (send canvas close-up)) - (super-on-close))]) - - (sequence - (super-init editor-name)) - - (inherit get-area-container) - (private - [space/canvas-panel (make-object horizontal-panel% (get-area-container))] - [canvas-panel (make-object vertical-pane% space/canvas-panel)] - [spacer (make-object grow-box-spacer-pane% canvas-panel)]) - - (sequence - (cond - [(pair? indicator) - (when canvas - (send canvas close-up)) - (set! canvas - (make-object GUI:design-paint-by-numbers-canvas% - canvas-panel - (car indicator) - (cdr indicator)))] - [(is-a? indicator bitmap%) - (when canvas - (send canvas close-up)) - (set! canvas - (make-object GUI:design-paint-by-numbers-canvas% - canvas-panel - (min biggest-editor (send indicator get-width)) - (min biggest-editor (send indicator get-height)))) - (when (or (> (send indicator get-width) biggest-editor) - (> (send indicator get-height) biggest-editor)) - (message-box - "Paint by Numbers" - (format "WARNING: Bitmap is larger than ~ax~a. Truncating." - biggest-editor biggest-editor))) - (send canvas set-bitmap indicator)] - [(problem? indicator) - (when canvas - (send canvas close-up)) - (set! canvas - (make-object GUI:design-paint-by-numbers-canvas% - canvas-panel - (length (problem-cols indicator)) - (length (problem-rows indicator)))) - (send canvas set-grid - (map vector->list (vector->list (problem-solution indicator))))])) - - (inherit get-menu-bar) - (sequence - (let* ([mb (get-menu-bar)] - [pbn-menu (make-object menu% "Nonogram" mb)]) - (make-object menu-item% "Test Puzzle" pbn-menu (lambda (_1 _2) (test-puzzle))) - - (make-object separator-menu-item% pbn-menu) - (add-font-items this pbn-menu))))) - - (define (editor bitmap?) - (let* ([default 15] - [get-sizes - (lambda () - (let* ([d (make-object dialog% "Size")] - [m (make-object message% "How big should the designer be?" d)] - [wp (make-object horizontal-panel% d)] - [wm (make-object message% "Width" wp)] - [gw (make-object slider% #f 1 biggest-editor wp void default)] - [hp (make-object horizontal-panel% d)] - [hm (make-object message% "Height" hp)] - [gh (make-object slider% #f 1 biggest-editor hp void default)] - [bp (make-object horizontal-panel% d)] - [cancelled? #f] - [cancel (make-object button% "Cancel" bp (lambda (_1 _2) - (set! cancelled? #t) - (send d show #f)))] - [ok (make-object button% "OK" bp (lambda (_1 _2) (send d show #f)) '(border))]) - - (let ([label-width (max (send wm get-width) - (send hm get-width))]) - (send wm min-width label-width) - (send hm min-width label-width)) - - (send bp set-alignment 'right 'center) - - (send d show #t) - (if cancelled? - #f - (cons (send gw get-value) - (send gh get-value)))))] - [get-bitmap - (lambda () - (let* ([fn (get-file "Select a bitmap")] - [bm (make-object bitmap% fn)]) - (if (send bm ok?) - bm - (begin - (message-box - "Paint by Numbers" - (format (format "Unreadable file: ~a" fn))) - #f))))] - [indicator - (cond - [(boolean? bitmap?) - (if bitmap? - (get-bitmap) - (get-sizes))] - [(problem? bitmap?) - bitmap?])]) - - (when indicator - (send (make-object editor-frame% indicator) show #t)))) - - (define player - (case-lambda - [() (player (car problems))] - [(problem) - (let ([f (make-object pbn-frame% problem)]) - (send f show #t))] - [(problem state) - (let ([f (make-object pbn-frame% problem)]) - (send (send f get-canvas) set-grid state) - (send f show #t))])) - - (player) - ;(editor #f) - - (yield (make-semaphore))) diff --git a/pkgs/games/paint-by-numbers/raw-problems/build-final.rkt b/pkgs/games/paint-by-numbers/raw-problems/build-final.rkt index ee49bbd551..93ed6d020a 100644 --- a/pkgs/games/paint-by-numbers/raw-problems/build-final.rkt +++ b/pkgs/games/paint-by-numbers/raw-problems/build-final.rkt @@ -10,6 +10,8 @@ in ... |# +(module test racket/base) + ;; shrink-file : string -> string (define (shrink-file filename) (printf "shrinking ~a..." filename) diff --git a/pkgs/games/paint-by-numbers/raw-problems/build-rows-cols.rkt b/pkgs/games/paint-by-numbers/raw-problems/build-rows-cols.rkt index 39d36e6554..c04aa1ded1 100644 --- a/pkgs/games/paint-by-numbers/raw-problems/build-rows-cols.rkt +++ b/pkgs/games/paint-by-numbers/raw-problems/build-rows-cols.rkt @@ -3,6 +3,8 @@ racket/class) (define argv (current-command-line-arguments)) +(module test racket/base) + (when (equal? (vector) argv) (error 'build-rows-cols.rkt "expected an image file on the command-line")) diff --git a/pkgs/games/parcheesi/make-bitmap.rkt b/pkgs/games/parcheesi/make-bitmap.rkt index 030aa4e840..24f8b6f63f 100644 --- a/pkgs/games/parcheesi/make-bitmap.rkt +++ b/pkgs/games/parcheesi/make-bitmap.rkt @@ -3,6 +3,8 @@ racket/gui racket/class) + (module test racket/base) + (provide show-board board-canvas% draw-board @@ -547,7 +549,7 @@ (resize-bitmap)) ;(send (get-dc) draw-bitmap buffer 0 0) (let ([dc (get-dc)]) - (send dc set-anti-alias #t) + (send dc set-smoothing 'smoothed) (draw-board board dc 32 32 0 0 #t))) (define/override (on-size w h) diff --git a/pkgs/games/parcheesi/parcheesi.png b/pkgs/games/parcheesi/parcheesi.png index cb6123547ff9dd9700290102dac9a07614516404..c67afcddd1cabd993a3db27e18f619ec30dc632a 100644 GIT binary patch delta 474 zcmV<00VV#41oQ)tB!9a}L_t(oh0RvGj>0ey97j}0r@NL^Tt)6rsKW=qr@;q=_U=yz z6;#khLZaO(z=`envDqBbjf4nZXJ@qQS*(Z%8cL!2@dObR0PK%fD|TB>t$lAl_x8D5 z%#@oagh`BCuWJz|Hs^QicZIvVMJMRzC2I3!G4hnSBz)w~dVeNLJcitfvjwb**+@lx zOwwCAxCbv7JMnYAt_4g?fQQvm2d%2F_CjI1z_cM?$6{zJ;IkSh7KC9nmVgkEh@2zh z8BF+a&?iEARDaZV-q8B{L-w-Kj-di}^9I1kL8L1&#wg<_At? zLuOhn2+kfMvLu0kJT(K%c-Mk~MBC4%ecqh<_Xz?i-W>P?m||Qq_v7yQ1x{BmIc~{1@Qw+%yeP`1{TCn z!Ggrh)Cq|XC?6087WfA~pk;z7td)?uAv3f|96Pbk7b@Q5_~Lsn&bzY-`?tW`9p+F9 z7Ki{Ko+O3X_u*vector - (delete - '(read-header-from-file read-footer-from-file read-from-file - end-write-header-footer-to-file) - (read-methods (build-path (collection-path "scribblings" "gui") - "text-class.scrbl") - 'defclass/title - (delete '(do-paste-x-selection do-paste do-copy) editor-methods))))) - -;; ---------------------------------------- - -(define bm-dc - (let ([bm (make-object bitmap% 10 10)]) - (make-object bitmap-dc% bm))) -(define frame - (new frame% [label "Test"])) -(define canvas - (new editor-canvas% [parent frame])) - -(define (generate-args contract-expr) - (if (pair? contract-expr) - (case (car contract-expr) - [(or/c one-of/c) (generate-args - (list-ref - (cdr contract-expr) - (random (length (cdr contract-expr)))))] - [(and/c) - (cond - [(equal? contract-expr '(and/c exact? integer?)) - (generate-args 'exact-integer?)] - [(equal? contract-expr '(and/c real? (not/c negative?))) - (random-elem '#(0.0 1.0 100.0 1000.0))] - [else (error "unknown" contract-expr)])] - [(box/c) `(box ,(generate-args (cadr contract-expr)))] - [(listof) (case (random 3) - [(0) 'null] - [(1) (list 'list - (generate-args (cadr contract-expr)))] - [(2) (list 'list - (generate-args (cadr contract-expr)) - (generate-args (cadr contract-expr)))])] - [(quote) - `(quote ,(cadr contract-expr))] - [(is-a?/c) - (case (cadr contract-expr) - [(editor-stream-out%) - (make-object editor-stream-out% (make-object editor-stream-out-bytes-base%))] - [(editor-stream-in%) - (make-object editor-stream-in% (make-object editor-stream-in-bytes-base% #""))] - [(snip%) - (let ([s (make-object string-snip%)]) - (send s insert "hi" 2) - s)] - [(mouse-event%) - (make-object mouse-event% 'motion)] - [(key-event%) - (make-object key-event%)] - [(editor-data%) (new editor-data%)] - [(text%) (new text%)] - [(pasteboard%) (new pasteboard%)] - [(cursor%) (make-object cursor% 'arrow)] - [(style-delta%) (new style-delta%)] - [(style-list%) (new style-list%)] - [(style<%>) (send (new style-list%) basic-style)] - [(editor-canvas%) canvas] - [(frame% dialog%) frame] - [(dc<%>) bm-dc] - [(editor-admin%) (send t get-admin)] - [(bitmap%) (make-object bitmap% 10 10)] - [(color%) (new color%)] - [(keymap%) (new keymap%)] - [(editor-wordbreak-map%) (new editor-wordbreak-map%)] - [else (error "unknown" contract-expr)])] - [(->) void] - [else (error "unknown" contract-expr)]) - (case contract-expr - [(any/c) #f] - [(path?) (string->path "/tmp/foo")] - [(path-string?) "/tmp/foo"] - [(input-port?) (open-input-bytes #"")] - [(output-port?) (open-output-bytes)] - [(real?) - (random-elem '#(0.0 1.0 -1.0 100.0 -100.0))] - [(exact-nonnegative-integer?) - (random-elem '#(0 1 2 10 100 1000))] - [(exact-integer?) - (random-elem '#(0 1 -1 2 10 -10 100 1000))] - [(string?) - (random-elem '#("a" "hello" ""))] - [(#f) #f] - [(#t) #t] - [else (error "unknown" contract-expr)]))) - -(define (random-elem v) - (vector-ref v (random (vector-length v)))) - -;; ---------------------------------------- - -(define t (new text%)) - -; (send t copy-self) -; (send t begin-write-header-footer-to-file (generate-args '(is-a?/c editor-stream-out%)) "" (box 0)) -; is-printing? -; #f for set-keymap -; seqcontract print -; undo error -; get-character -; blink-caret & no admin -; move-position & no admin - -(define-namespace-anchor a) - -(let ([n (abs (current-milliseconds))]) - (printf "~s\n" n) - (random-seed n)) - -(parameterize ([current-namespace (namespace-anchor->namespace a)]) - (let loop () - (let ([m (random-elem text-methods)]) - (let ([name (car m)] - [args (map generate-args (cdr m))]) - (printf "Call ~s\n" (cons name args)) - (eval `(send ,t ,(car m) ,@args)) - (loop))))) - diff --git a/pkgs/htdp-pkgs/htdp-lib/2htdp/info.rkt b/pkgs/htdp-pkgs/htdp-lib/2htdp/info.rkt index 4c5870602a..208227b8b8 100644 --- a/pkgs/htdp-pkgs/htdp-lib/2htdp/info.rkt +++ b/pkgs/htdp-pkgs/htdp-lib/2htdp/info.rkt @@ -1,3 +1,7 @@ #lang info (define name "HtDP/2e Teachpacks") + +(define test-omit-paths '("uchat/chatter.rkt" + "uchat/server.rkt")) + diff --git a/pkgs/htdp-pkgs/htdp-lib/graphics/turtle-test.rkt b/pkgs/htdp-pkgs/htdp-lib/graphics/turtle-test.rkt index d509bfd9c8..206e10a51e 100644 --- a/pkgs/htdp-pkgs/htdp-lib/graphics/turtle-test.rkt +++ b/pkgs/htdp-pkgs/htdp-lib/graphics/turtle-test.rkt @@ -5,6 +5,8 @@ "turtle-examples.rkt" "turtles.rkt") + (module test racket/base) + (define frame (make-object frame% "Turtle Examples")) (define options diff --git a/pkgs/htdp-pkgs/htdp-lib/graphics/value-turtles-test.rkt b/pkgs/htdp-pkgs/htdp-lib/graphics/value-turtles-test.rkt index 69b562c8bd..6993d5968f 100644 --- a/pkgs/htdp-pkgs/htdp-lib/graphics/value-turtles-test.rkt +++ b/pkgs/htdp-pkgs/htdp-lib/graphics/value-turtles-test.rkt @@ -3,6 +3,8 @@ "value-turtles.rkt" mred mzlib/class) + + (module test racket/base) (define-syntax (test stx) (syntax-case stx () diff --git a/pkgs/htdp-pkgs/htdp-lib/htdp/graphing.rkt b/pkgs/htdp-pkgs/htdp-lib/htdp/graphing.rkt index 54099fe262..c3810a01c0 100644 --- a/pkgs/htdp-pkgs/htdp-lib/htdp/graphing.rkt +++ b/pkgs/htdp-pkgs/htdp-lib/htdp/graphing.rkt @@ -14,6 +14,8 @@ graph-line ) +(module test racket/base) + (define-higher-order-primitive graph-line graph-line/proc (f _)) (define-higher-order-primitive graph-fun graph-fun/proc (f _)) diff --git a/pkgs/htdp-pkgs/htdp-lib/teachpack/htdp/graphing.rkt b/pkgs/htdp-pkgs/htdp-lib/teachpack/htdp/graphing.rkt index cab3946130..f5c2a1035b 100644 --- a/pkgs/htdp-pkgs/htdp-lib/teachpack/htdp/graphing.rkt +++ b/pkgs/htdp-pkgs/htdp-lib/teachpack/htdp/graphing.rkt @@ -1,3 +1,4 @@ #lang racket/base (require htdp/graphing) (provide (all-from-out htdp/graphing)) +(module test racket/base) diff --git a/pkgs/htdp-pkgs/htdp-test/2htdp/tests/info.rkt b/pkgs/htdp-pkgs/htdp-test/2htdp/tests/info.rkt new file mode 100644 index 0000000000..3dcf1147b8 --- /dev/null +++ b/pkgs/htdp-pkgs/htdp-test/2htdp/tests/info.rkt @@ -0,0 +1,16 @@ +#lang info + +(define test-omit-paths + '("jpr-bug.rkt" + "mouse-evt.rkt" + "mp.rkt" + "perform-whack.rkt" + "profile-robby.rkt" + "dir.rkt" + "matrix-client.rkt" + "matrix-example.rkt" + "jump-to-ui-test.rkt" + "on-release-no-key.rkt" + "pad1.rkt" + "universe-receive.rkt" + "batch-io-xexpr.rkt")) diff --git a/pkgs/htdp-pkgs/htdp-test/2htdp/tests/perform-record.rkt b/pkgs/htdp-pkgs/htdp-test/2htdp/tests/perform-record.rkt index 41a5ddd518..9505204297 100644 --- a/pkgs/htdp-pkgs/htdp-test/2htdp/tests/perform-record.rkt +++ b/pkgs/htdp-pkgs/htdp-test/2htdp/tests/perform-record.rkt @@ -1,7 +1,7 @@ #reader(lib"read.ss""wxme")WXME0108 ## #| This file uses the GRacket editor format. - Open this file in DrRacket version 5.1.1.5 or later to read it. + Open this file in DrRacket version 6.0.0.1 or later to read it. Most likely, it was created by saving a program in DrRacket, and it probably contains a program with non-text elements @@ -9,7 +9,7 @@ http://racket-lang.org/ |# - 44 7 #"wxtext\0" + 30 7 #"wxtext\0" 3 1 6 #"wxtab\0" 1 1 8 #"wximage\0" 2 0 8 #"wxmedia\0" @@ -17,38 +17,31 @@ 1 0 16 #"drscheme:number\0" 3 0 44 #"(lib \"number-snip.ss\" \"drscheme\" \"private\")\0" 1 0 36 #"(lib \"comment-snip.ss\" \"framework\")\0" -1 0 43 #"(lib \"collapsed-snipclass.ss\" \"framework\")\0" +1 0 93 +( + #"((lib \"collapsed-snipclass.ss\" \"framework\") (lib \"collapsed-sni" + #"pclass-wxme.ss\" \"framework\"))\0" +) 0 0 43 #"(lib \"collapsed-snipclass.ss\" \"framework\")\0" 0 0 19 #"drscheme:sexp-snip\0" 0 0 36 #"(lib \"cache-image-snip.ss\" \"mrlib\")\0" 1 0 68 ( #"((lib \"image-core.ss\" \"mrlib\") (lib \"image-core-wxme.rkt\" \"mr" #"lib\"))\0" -) 1 0 33 #"(lib \"bullet-snip.ss\" \"browser\")\0" -0 0 29 #"drscheme:bindings-snipclass%\0" -1 0 25 #"(lib \"matrix.ss\" \"htdp\")\0" +) 1 0 29 #"drscheme:bindings-snipclass%\0" +1 0 88 +( + #"((lib \"pict-snip.rkt\" \"drracket\" \"private\") (lib \"pict-snip.r" + #"kt\" \"drracket\" \"private\"))\0" +) 0 0 34 #"(lib \"bullet-snip.rkt\" \"browser\")\0" +0 0 25 #"(lib \"matrix.ss\" \"htdp\")\0" 1 0 22 #"drscheme:lambda-snip%\0" -1 0 8 #"gb:core\0" -5 0 10 #"gb:canvas\0" -5 0 17 #"gb:editor-canvas\0" -5 0 10 #"gb:slider\0" -5 0 9 #"gb:gauge\0" -5 0 11 #"gb:listbox\0" -5 0 12 #"gb:radiobox\0" -5 0 10 #"gb:choice\0" -5 0 8 #"gb:text\0" -5 0 11 #"gb:message\0" -5 0 10 #"gb:button\0" -5 0 12 #"gb:checkbox\0" -5 0 18 #"gb:vertical-panel\0" -5 0 9 #"gb:panel\0" -5 0 20 #"gb:horizontal-panel\0" -5 0 33 #"(lib \"readable.ss\" \"guibuilder\")\0" -1 0 57 +1 0 26 #"drracket:spacer-snipclass\0" +0 0 57 #"(lib \"hrule-snip.rkt\" \"macro-debugger\" \"syntax-browser\")\0" -1 0 45 #"(lib \"image-snipr.ss\" \"slideshow\" \"private\")\0" 1 0 26 #"drscheme:pict-value-snip%\0" -0 0 38 #"(lib \"pict-snipclass.ss\" \"slideshow\")\0" +0 0 45 #"(lib \"image-snipr.ss\" \"slideshow\" \"private\")\0" +1 0 38 #"(lib \"pict-snipclass.ss\" \"slideshow\")\0" 2 0 55 #"(lib \"vertical-separator-snip.ss\" \"stepper\" \"private\")\0" 1 0 18 #"drscheme:xml-snip\0" 1 0 31 #"(lib \"xml-snipclass.ss\" \"xml\")\0" @@ -56,38 +49,37 @@ 2 0 34 #"(lib \"scheme-snipclass.ss\" \"xml\")\0" 1 0 10 #"text-box%\0" 1 0 32 #"(lib \"text-snipclass.ss\" \"xml\")\0" -1 0 15 #"test-case-box%\0" -2 0 1 6 #"wxloc\0" - 0 0 111 0 1 #"\0" +1 0 1 6 #"wxloc\0" + 0 0 129 0 1 #"\0" 0 75 1 #"\0" 0 12 90 -1 90 -1 3 -1 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 255 255 255 1 -1 0 9 #"Standard\0" -0 75 23 #"Lucida Sans Typewriter\0" -0 11 90 -1 90 -1 1 -1 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 255 255 255 1 -1 2 1 +0 75 7 #"Monaco\0" +0 11 90 -1 90 -1 3 -1 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 255 255 255 1 -1 2 1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1 1 1 1 1 1 0 0 0 0 0 0 -1 -1 2 24 #"framework:default-color\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1 -#"\0" +1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 255 255 255 -1 -1 2 +1 #"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 150 0 150 0 0 0 -1 -1 2 15 #"text:ports out\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 150 0 150 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 150 0 150 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 255 0 0 0 0 0 -1 -1 2 15 #"text:ports err\0" 0 -1 1 #"\0" -1.0 0 -1 -1 93 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 255 0 0 0 0 0 -1 --1 2 1 #"\0" +1 0 -1 92 93 -1 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 1 +#"\0" 0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 175 0 0 0 -1 -1 2 17 #"text:ports value\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 175 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 0 0 175 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 34 139 34 0 0 0 -1 @@ -96,133 +88,187 @@ 1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 34 139 34 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 37 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 37 #"framework:syntax-color:scheme:symbol\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 38 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 38 #"framework:syntax-color:scheme:keyword\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2 38 #"framework:syntax-color:scheme:comment\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 37 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 37 #"framework:syntax-color:scheme:string\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 39 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 35 +#"framework:syntax-color:scheme:text\0" +0 -1 1 #"\0" +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 39 #"framework:syntax-color:scheme:constant\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 41 128 38 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 132 60 36 0 0 0 -1 -1 2 42 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 132 60 36 0 0 0 -1 -1 2 49 +#"framework:syntax-color:scheme:hash-colon-keyword\0" +0 -1 1 #"\0" +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 132 60 36 0 0 0 -1 -1 2 42 #"framework:syntax-color:scheme:parenthesis\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 132 60 36 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 132 60 36 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 36 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 36 #"framework:syntax-color:scheme:error\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 36 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 36 #"framework:syntax-color:scheme:other\0" 0 -1 1 #"\0" +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 16 +#"Misspelled Text\0" +0 -1 1 #"\0" 1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 81 112 203 0 0 0 -1 -1 2 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 81 112 203 0 0 0 -1 -1 2 38 #"drracket:check-syntax:lexically-bound\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 81 112 203 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 81 112 203 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 28 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 28 #"drracket:check-syntax:set!d\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 37 +#"drracket:check-syntax:unused-require\0" +0 -1 1 #"\0" +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 36 +#"drracket:check-syntax:free-variable\0" +0 -1 1 #"\0" +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 68 0 203 0 0 0 -1 -1 2 31 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 68 0 203 0 0 0 -1 -1 2 31 #"drracket:check-syntax:imported\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 68 0 203 0 0 0 -1 -1 2 47 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 68 0 203 0 0 0 -1 -1 2 47 #"drracket:check-syntax:my-obligation-style-pref\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 116 0 0 0 0 -1 -1 2 50 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 0 116 0 0 0 0 -1 -1 2 50 #"drracket:check-syntax:their-obligation-style-pref\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 116 0 0 0 0 -1 -1 2 48 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 0 116 0 0 0 0 -1 -1 2 48 #"drracket:check-syntax:unk-obligation-style-pref\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 139 142 28 0 0 0 -1 -1 2 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 139 142 28 0 0 0 -1 -1 2 49 #"drracket:check-syntax:both-obligation-style-pref\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 139 142 28 0 0 0 -1 -1 2 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 139 142 28 0 0 0 -1 -1 2 26 #"plt:htdp:test-coverage-on\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0 0 0 255 56 81 0 0 0 -1 -1 2 27 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1 2 27 #"plt:htdp:test-coverage-off\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 0 0 0 255 56 81 0 0 0 -1 -1 4 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1 4 1 #"\0" 0 70 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0 -1 -1 4 4 #"XML\0" 0 70 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0 --1 -1 2 1 #"\0" +-1 -1 2 37 #"plt:module-language:test-coverage-on\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 37 -#"plt:module-language:test-coverage-on\0" -0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 1 -#"\0" -0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 176 48 96 0 0 0 -1 -1 2 38 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 38 #"plt:module-language:test-coverage-off\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 176 48 96 0 0 0 -1 -1 4 1 +1 0 -1 92 -1 93 -1 -1 0 1 0 0 0 1 0 0 0 0 0 0 255 165 0 0 0 0 -1 -1 0 1 #"\0" +0 75 23 #"Lucida Sans Typewriter\0" +0.0 11 90 -1 90 -1 1 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 +255 255 1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0 +-1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 38 38 128 0 +0 0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 194 116 31 0 +0 0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 41 128 38 0 +0 0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 132 60 36 0 +0 0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 255 0 0 0 0 +0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 81 112 203 0 +0 0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 178 34 34 0 +0 0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 68 0 203 0 0 +0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 116 0 0 0 +0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 139 142 28 0 +0 0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 0.0 0.0 0.0 255 56 81 0 +0 0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 34 139 34 0 +0 0 -1 -1 2 1 #"\0" +0 -1 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 176 48 96 0 +0 0 -1 -1 4 1 #"\0" 0 71 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0 -1 -1 4 1 #"\0" 0 -1 1 #"\0" -1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 0 255 0 0 0 -1 --1 4 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 255 0 0 +0 -1 -1 4 1 #"\0" 0 71 1 #"\0" -1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 0 255 0 0 0 -1 --1 4 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 1 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 255 0 0 +0 -1 -1 4 1 #"\0" 0 71 1 #"\0" -1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1.0 1.0 1.0 0 100 0 0 0 0 -1 --1 4 1 #"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 100 0 0 0 +0 -1 -1 4 1 #"\0" 0 -1 1 #"\0" -1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 255 255 0 -1 -1 0 -1 #"\0" +1.0 0 92 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 +255 0 -1 -1 0 1 #"\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 200 0 0 0 0 0 -1 -1 0 1 -#"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 200 0 0 0 0 +0 -1 -1 0 1 #"\0" 0 -1 1 #"\0" -0 13 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0 +0.0 13 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0 -1 -1 2 1 #"\0" 0 -1 1 #"\0" -0 13 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0 +0.0 13 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 1.0 1.0 1.0 1.0 1.0 1.0 0 0 0 0 0 0 -1 -1 0 1 #"\0" 0 75 12 #"Courier New\0" 0.0 13 90 -1 90 -1 3 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 @@ -231,20 +277,20 @@ 0.0 12 90 -1 90 -1 1 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 255 255 1 -1 2 38 #"drscheme:check-syntax:lexically-bound\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 81 112 203 0 0 0 -1 -1 2 -28 #"drscheme:check-syntax:set!d\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 81 112 203 0 +0 0 -1 -1 2 28 #"drscheme:check-syntax:set!d\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 178 34 34 0 0 0 -1 -1 2 31 -#"drscheme:check-syntax:imported\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 178 34 34 0 +0 0 -1 -1 2 31 #"drscheme:check-syntax:imported\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 68 0 203 0 0 0 -1 -1 8 1 -#"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 68 0 203 0 0 +0 -1 -1 8 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 255 0 0 0 0 0 -1 -1 8 24 #"drscheme:text:ports err\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 255 0 0 0 0 -0 -1 -1 22 1 #"\0" +0 -1 -1 24 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0 -1 -1 15 1 #"\0" @@ -259,7 +305,7 @@ -1 -1 19 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0 --1 -1 22 1 #"\0" +-1 -1 24 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0 0 0 -1 -1 14 1 #"\0" @@ -271,7 +317,7 @@ 0 0 -1 -1 4 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 -255 255 -1 -1 22 1 #"\0" +255 255 -1 -1 24 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 255 255 -1 -1 15 1 #"\0" @@ -286,7 +332,7 @@ 255 255 -1 -1 15 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0 -0 0 -1 -1 20 1 #"\0" +0 0 -1 -1 21 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0 0 0 -1 -1 19 1 #"\0" @@ -295,7 +341,7 @@ 0 0 -1 -1 17 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 -255 255 -1 -1 20 1 #"\0" +255 255 -1 -1 21 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 255 255 -1 -1 0 1 #"\0" @@ -315,11 +361,11 @@ 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 100 0 0 0 0 -1 -1 2 41 #"profj:syntax-colors:scheme:block-comment\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2 -35 #"profj:syntax-colors:scheme:keyword\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 194 116 31 0 +0 0 -1 -1 2 35 #"profj:syntax-colors:scheme:keyword\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 1 -#"\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0 +-1 -1 2 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 139 0 139 0 0 0 -1 -1 2 37 #"profj:syntax-colors:scheme:prim-type\0" @@ -327,29 +373,29 @@ 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 139 0 139 0 0 0 -1 -1 2 38 #"profj:syntax-colors:scheme:identifier\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 38 38 128 0 0 0 -1 -1 2 34 -#"profj:syntax-colors:scheme:string\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 38 38 128 0 +0 0 -1 -1 2 34 #"profj:syntax-colors:scheme:string\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 35 -#"profj:syntax-colors:scheme:literal\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 34 139 34 0 +0 0 -1 -1 2 35 #"profj:syntax-colors:scheme:literal\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 34 139 34 0 0 0 -1 -1 2 35 -#"profj:syntax-colors:scheme:comment\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 34 139 34 0 +0 0 -1 -1 2 35 #"profj:syntax-colors:scheme:comment\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 194 116 31 0 0 0 -1 -1 2 -33 #"profj:syntax-colors:scheme:error\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 194 116 31 0 +0 0 -1 -1 2 33 #"profj:syntax-colors:scheme:error\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 255 0 0 0 0 0 -1 -1 2 35 -#"profj:syntax-colors:scheme:default\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 255 0 0 0 0 +0 -1 -1 2 35 #"profj:syntax-colors:scheme:default\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 37 -#"profj:syntax-colors:scheme:uncovered\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0 +-1 -1 2 37 #"profj:syntax-colors:scheme:uncovered\0" 0 -1 1 #"\0" -1 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 -1 -1 2 35 -#"profj:syntax-colors:scheme:covered\0" +1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0 +-1 -1 2 35 #"profj:syntax-colors:scheme:covered\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 0 0.0 0.0 0.0 1.0 1.0 1.0 139 0 139 0 -0 0 -1 -1 20 1 #"\0" +0 0 -1 -1 21 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0 -1 -1 2 1 #"\0" @@ -367,16 +413,16 @@ -1 -1 17 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0 -0 0 -1 -1 24 1 #"\0" +0 0 -1 -1 26 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 1.0 1.0 1.0 0 0 0 0 0 0 --1 -1 24 1 #"\0" +-1 -1 26 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 255 255 -1 -1 0 1 #"\0" 0 75 12 #"Courier New\0" 0.0 12 90 -1 90 -1 3 -1 0 1 0 1 0 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 255 -255 255 1 -1 24 1 #"\0" +255 255 1 -1 26 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 0 1 0.0 0.0 0.0 0.0 0.0 0.0 255 165 0 0 0 0 -1 -1 0 1 #"\0" @@ -385,932 +431,955 @@ 255 255 1 -1 14 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 0 0 0 --1 -1 20 1 #"\0" +-1 -1 21 1 #"\0" 0 -1 1 #"\0" 1.0 0 -1 -1 -1 -1 -1 -1 0 0 0 0 1 0 0.0 0.0 0.0 0.0 0.0 0.0 0 0 0 0 0 0 --1 -1 0 452 0 26 3 12 #"#lang racket" -0 0 4 3 1 #" " -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +-1 -1 0 412 0 28 3 12 #"#lang racket" +0 0 24 3 1 #" " +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 102 ( #";; -----------------------------------------------------------------" #"----------------------------------" -) 0 0 4 29 1 #"\n" +) 0 0 24 29 1 #"\n" 0 0 17 3 74 ( #";; can world/universe cope with large backgrounds and small moving t" #"hing? " -) 0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" -0 0 14 3 7 #"require" -0 0 4 3 1 #" " +) 0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" +0 0 15 3 7 #"require" +0 0 24 3 1 #" " 0 0 14 3 14 #"2htdp/universe" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" -0 0 14 3 7 #"require" -0 0 4 3 1 #" " +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" +0 0 15 3 7 #"require" +0 0 24 3 1 #" " 0 0 14 3 11 #"2htdp/image" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 3 #"; (" 0 0 17 3 6 #"struct" 0 0 17 3 1 #" " 0 0 17 3 4 #"posn" 0 0 17 3 1 #" " 0 0 17 3 1 #"(" -0 0 17 3 1 #"x" -0 0 17 3 4 #" y))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +0 0 17 3 5 #"x y))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 12 #";; CONSTANTS" -0 0 4 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 34 #";; I can now do 24 and it is okay " -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 9 #"num-grass" -0 0 4 3 1 #" " -0 0 20 3 2 #"24" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" -0 0 17 3 3 #";; " -0 0 17 3 20 #"GRAPHICAL CONSTANTS:" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 3 1 #" " +0 0 21 3 2 #"24" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" +0 0 17 3 23 #";; GRAPHICAL CONSTANTS:" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 6 #"hammer" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 6 #"circle" -0 0 4 3 1 #" " -0 0 20 3 1 #"3" -0 0 4 3 1 #" " +0 0 24 3 1 #" " +0 0 21 3 1 #"3" +0 0 24 3 1 #" " 0 0 19 3 7 #"\"solid\"" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 19 3 8 #"\"yellow\"" -0 0 22 3 2 #"))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 3 2 #"))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 9 #"mole-look" -0 0 4 3 1 #" " -0 2 27 4 1 #"\0" -2 -1.0 -1.0 0.0 0.0 0 8 500 -( - #"\211PNG\r\n\32\n\0\0\0\rIHDR\0\0\0(\0\0\0(\b" - #"\2\0\0\0\3\234/:\0\0\0\6bKGD\0\377\0\377\0\377\240\275\247" - #"\223\0\0\16\eIDATX\205M\227k\214]\327U\307\327\332{\237\307}" - #"\317\334\271w\0\245*\2\265&D\211\250*T\276P$$J)\205>\2224" - #"\220\264M\342\264I\354x<\266\347i" - #"\317\314\275w\356\373\234\263\367^k\361" - #"\341\332U\217\366\221\216\326\227\265\367Z" - #"\353\374\377\277\215\247\2770\23\307\2216" - #"&\bL\232\244\365\311Zc\267\231$\351^\243-\0GO\34\n\202\260?\350" - #"\347\313Q\261X|\343\245\225\2557\373" - #"\335u\3526\23\4\b\202`8\260\245" - #"\261\\\232$\343\363\321\241\367L\344j" - #"R,\25|\312\271|\f\f\205b\241\325\3323\306\30\243\327\257l\2\2021\246" - #"\\)U\306\312\246>9\261\276\272Y\31\253\24\213y\"\332\334\270Z(\3461" - #"\305#'\16]8\277\22\305a\273\323" - #"\3514\373/\177\243u\355\r\267\210\205" - #"\343\v\325\303\207\306n\376\345j\20h" - #"T\210\210\316q\273\227\235\273\322\374\341" - #"\327\266.d\355\3w\27&o5\205RT\31\253\300`\20\6\2411zkk" - #"\373\360\321\203\347\337^\276\351\340\201\213" - #"\27.i\243\361c\317\34\31\364\207\371" - #"B\256\333\351\25\212\371,\265J!\"" - #"\246i\326\335\353\335q\357-\27\177\272" - #"\365\372W\e\307\242\302\335\307\353\367\235" - #"\232%AP\n\224B\245\21\1\1\21\0\0204B>\320/\374d\343\205\3277" - #"_\332\332<\365\370de&d\a\23\265\361\265+\e\0p\350\346\245^" - #"\257\337l\264J\245b\222\244\272v" - #"\247\314\355\237y\343\325\267k\365\361K" -) 500 -( - #"\357\254M\324\253D<5=\231/\344" - #"\362\225h\371\245\306\213\177\275\376\a\247\17>t\327l\255VH=0\"\340(" - #"\253\2T\200(\240X\304\263\fR\267" - #"\257\236\177\367mS\357\232\235|\356o" - #"\317\233\252\34\273\367\300\325\215\355\271\375" - #"3\v\213\363I\222\354l\357\216W\307V\226W\231Y\37\373P}8Lf\366" - #"O\r\a\311\342\241\371 \320\205B\276" - #"\275\327\351\r\272\347\236\337Y\371\247\316W>y\fB\355\4\225R:4&\320" - #"\312\30\255\225\322Z)\205J\215v\2" - #"\2\2\342\231\207\211\213b\374\324\a\16" - #"?\367\345\345\264\220b\321Fa\264\276\27215\263\257\331h1q\257;(\225" - #"\v\252>9Q\235\30\363\336O\324\306" - #"{\235~\241X\34\16\2238\37\25\342" - #"\312\325\177\317\376\360\303s\253\315\324:" - #"b\26\1\4\1\21\24A\1\0\26\26\20\6\0`\31\225\34\5@\0\274\345\213" - #"W\273g~\377\256\325\177\35h\t\202" - #"\320,\35Z\274t\361\312\334\376\231(" - #"\n\367/\314\224\312E=\377\336\234R" - #"*\227\213\257\\Z_:\274\330\336\353\0\200g\367\243\2577\2161\326'\2A" - #"\fL\20\204F\ec\2\243\224B\205\nQ\20\0\0D\4\4DDD\230=" - #"1\239G\326\271\324Z\337\263o\\N\352G\364^\263\233\317\307\271|\16\21" - #"\366Z\235d\230\250\301`HDY\226\205Q\270ve\243P\310G\271p\355\342" - #".\234\355\335s\274\2309 \22\357\310" - #"{&f\357\330\263\20\221\363d\235\267\316Y\357\235#K\336zr$D\354\211" - #"\35\21\21\17\206\356\241wM\344/\372v#i\3546Q\341\356Ns\320\37F" - #"QX*\227Te\254\354\235\367\236\3020\0\200K\27\257\240\222\366E\312iL" - #"\2540\210\bZ\362\236\274\367\344\210\274\263\316yk" - #"\255\265>\2636\313\234\265\326f\336;\347\234\363\336" -) 500 -( - #"{O\336\263\367\3369j\17l\301\340" - #"\352O:\323\363\365~o\320\353\366\312" - #"\225\22\21U\306Jj\364\347\30c\20QDf\366Ow\372\235\215W\374\an" - #"+'V\230\205D\4@<3\221\263>\313|\226\2724\265Y\232eI\226%" - #"i\232fY\226\245\231\315\254\265\231g" - #"O\300\344\211\254s\335^\372\341\273\306" - #"w_\207\376\260\237\245\351xulg" - #"\273\21\206\341\325\255\0353\222\222\341`" - #"86^\216\343\330:k$\366\3336=\314\fJ\0304\310\332N\362\326z\363" - #"\364\35\373\26f\306\310\0033#\242\b \0 \"\"\2\b\200Q\210\302\e;" - #"\335o\377h\343\226\371\322\276\262\"\346" - #"DH\232\204\336\2041\306\271\330{\"" - #"\"\245\3200\263\367^k\275\327\352h\335g!\311r\2139m\t\4\201\205\211" - #"%2j\263\221<\367\255\225{\216\327" - #"\37\274c\272\220\v\275\37\245\5\0\4" - #"\0\205\2505\366\206\376\a\257n\375\360" - #"g;\221\301\333\17\24=\t\21\210\300RA+\227/O\30\357}\241\230/\24" - #"\362\233\eW\315^\253\35\206a\232\246" - #"\343\325\261~o@\354\262\16\22\0\v" - #"\3\0\211\262$\265J\360[\357\233{" - #"\375R\377\ag\267_~\273\365\321\373\347nY\252\262\b3\0\200B\20\205g" - #"\227\333\377\366\302\3320\365\367\337V;" - #"\265TA\241a\342D\230E\34\263\22" - #"\243\24\222\343n\247\327iw\353\223\23" - #"\2462V\316\347sJ\251\235\355\0063" - #"\357\233\236\334\354\365\0@\4XD\263" - #"0\263u\34\307\372\275\267M\334}|" - #"\342{\257m\177\355\333\227\26gv\236" - #"\374\320\301\221\\z\222g\277y\361\362" - #"V\377\356c\265\323wL\306\6\372Ck\0353\v\263 \2000Dq\250\265\f" - #"{\3\243M\24\207\210h\2141\315\306^\222\244\245Ra" - #"\274Z\351vz6\315@\200\275\210\6a\20f&a\342" -) 500 -( - #"A\342\343(\370\310}s\247\216\324V" - #"\257\r\230\31@\1\210\210\34\235\257\274" - #"\377\356\231\375\265(K)I\274'f\22!f\1d@\304v\253\23U\363\314" - #"<^\255t\332\2754\315\214R\230$" - #"i\261\230\217\342\250\337\eL\316\324m" - #"\267\275);\4\0\2$\314\254\30\204\2045\213'N\254\237\231\210gk9\26" - #"\6`\20\21\300w\237\230\20\346$#\"\362\302\302B\314^\200Xp\2440\0" - #"a\20\2547\266\306\306\313\205b~\347" - #"\332\256\352\367\6\265z5\316\305\315f" - #"+\314\233\213\313+\227_j)\203\"\",\2\302\"\302\314\"\f<\352\231'" - #"\357\311\217b,,B\236\274#ff/\314\302\304\3142\352\225\210\260\0x\246" - #"|%W\251\226\226\317_\266\231\r\302" - #"\300\230\300x\357Q\301\336\372\260y\216" - #"\372\257\311\326[{3\365\200E\0\220\5D\200D\210\205Y\210\30\24j\255\3" - #"\203JiD\20\21\357\311z!\26a\21\26f\21\30m\26D\4\1LN]" - #"\371\372.uaj\261r\354\344d\30D\210h\202 \330X\333:t\313Bo" - #"\235/}\263\t\0!\2\260(D\6\20b\322\34\220\322 (\4\300\21J/" - #"\201\377~~\263?L\362\345\2450\257\277\363" - #"\347+v\225\224\206P\0011\222\6\20\0\304C\323\321|U7e" -) 500 -( - #"\352\323\177\362\305\323\247OW+\305\27" - #"\377\367\265O?z\352\300l\354\371\272" - #"|h\360\233~\341\225\263\27Y`u" - #"\355\352\27\376\342O\317\275\370\317\216\365" - #"\233\253CK\262X\17\272)/0[O\233\3\325\233W\367\177f*P\221Q" - #"\1\264W\251\267J\201\6\255\20P\4a_I\37\231\nW\32\376\374f\372\306" - #"\252|\356\217?\376\321G>h\214\1\200K+\357\264:\220/\22\313H\263\300" - #";\277=\274\n\0\300T\257\26\217\237" - #"\270\365\231g\277\212B\307\347s\207&\243b\4/\\\30j\324%\203\23J\266" - #"W\275\335\t\3439\324\267\177|\372\277" - #">\177Q%\202\32\265\22\r\212\1\342" - #"@\355\37\3233\325(\4\373\301_\377" - #"\335\177|\356\231\327^{\355W\36y" - #"\244\325j\335z\342\370\353\313k\337}" - #"\376\254Q4\314h\365\32\3658\377\371" - #"\277\372\312\341\203K\"\362\e\237\370\304" - #"\231\277?\363\364\2313\235\306\225\223\265" - #"\201 \222\207\265=;\16\30j\360\314" - #"\342\341g\257\356\335\376\261i|\364\351" - #"[\376\345w~\26(P\b\32\301(\364$\265\262>9\e\231\0\177|~\260" - #"\334H\227\317\277\265\275\263\263\264\264\344" - #"\254UZW*\225\37\375\370\325\257\234" - #"\371r\222$\17\277\357\341\307\36{L!\244ij\214YYY\251\327\353'O" - #"\336\372\370o?\341.|\303r\250\200" - #"\377oe8/\230\17\244\233I\303\302\312\220>\3647\207L{g0\362\26\274" - #".\223 \2\b\b\0\326C\30\301SO=u\356\334\233\17=\370`\275VK" - #"\323\24\0\232\215\306\354\364\276\277\373\322" - #"\227\224\326i\232\356^\273J\314\0\20" - #"\307\361\313\257\274\362?\337\375\356\3\367" - #"?p\356\315\263\213F\1\2148\5EDH\242@\205\336\207\0v(\306:" - #"{\235ap\224[\4\241\227\311O7\263\346\2203\aO\377\303\231\373\357{" -) 500 -( - #"O\251P\330k4\254sp\335\2230\n\2P\312;GD\243X\22\4\205\\" - #"\216\211\316<\375L\253\265{>\247\252E3UR\0311\"j\205\n\20\1\2" - #"\2004\315Lh\2\6\320\b\302\340\0\210A\0\262\204\210\325tY\317V\203a" - #"j\2438^<\260d\235\367\316\v\210" - #"R*\216r\337\372\316\367\377\343\333\377" - #"\371g\237\373l\271\\\364\316\t\b\21" - #"\335\365\256;\a)o\257\375\345]\363" - #"\305\265]\267\265\347\327\233\216X:\b" - #"\32395\237\203\320h\r\236\210\314\350" - #"\20\2\210(D\240\25\200\300\276\262\276e6\4@mp\242\230\37^{\341\367" - #">\365\203\371\233\216O\315.\306\271B" - #"\253q\365\312\345\363U\275sj\272\360" - #"G\237\371\315\231\371cS3\243\370\326" - #"\345\225\363y\272v\357MeG\252\24" - #"\353#\323\b \327\251U\2030\3" - #"\221x/a\20\344sJ+D\205\302\220d\f\0\210\20\4A\305\4\"\314\2" - #"Db\35\23\213'!\22\"a\4\6\20@\0V\332\370\241\213\246P\27H\265" - #"w{G\37\255\312\215\231\1\4\301\237\e\3x\26\"q\314\316\263#\266\2363" - #"\"\353\3109\362\344\275\367\316{g\275" - #"s\336:\266\236\234'\347\305{\342\21c\v\320\310\247@Pi\0\30\246r\362" - #"\311\3i\317\252\\\224+-\250\303\2774\341i\344)#>\37\331\341" - #"\b\2\200\348\"g\3319\262\226" - #"\254\343\314\223\265l\35[\313\231\247\314" -) 500 -( - #"q\346\310Yv\236\275\367\336\213\365B\304\376\206C2\b \f;6\274\2672" - #"}\264@\226M\253\331\326F\235|\242" - #"\266}\251\323\273\352\215\36\235X\204\205G\25\0B@p\n4\263\0*Dd" - #"\24\4u\275J\300 x\375:\301\f\314@,\314L,D\250@\0\200\31$" - #"\343\356\\|\354\211}\203\275\244\\)" - #"\351\375\17\304&\b\222a:ug\276\361\323$\35\b\0\24B\34\217\25\313\365" - #"\352\213\0\b\b\200\220\260 1\b_o!\2210\213' \17\344\331\263\0203" - #"\21\23\1\23\b\3\210\354\364\270\344\241" - #"W\v\247>Y\315\347B\233\270$I" - #"\365\341\367\217+\245\210$\227\17\357\371" - #"\370\221\356\306\260\265\236\3465\216\347\221" - #"\361\6\276\302H\321DD\210\371\6Q\375\302\242\eA\22O@#Vb \26" - #"!i\3551\34\vo\373\354\341\341\240\3473\212\242\260X*\350}\367\350C7" - #"\337\204\b\n\325\265k\333\a\37\252\205U\244\r\210\206\26Q\201\32]?a4" - #"\232\f \f#\264 \2\276\361\315\4,\300\204\302\3027\20\211Ih\300]\255" - #"'>R\271\375\361\203n\230\225KecL\226\331^\257\257o\377\325Ykm" - #">\237K\223\24QEA\34\214\373\362\335\301@\an\327S\217\f \213\334h" - #"<\260\0\v\n\303\317\27\217\202$?" - #"\317\307\231\244\251d\221Nn\213\36\376" - #"\342\375q\r8\345^wP\256\224\262" - #"\314v\332]\347\34>\366\265[\213\245" - #"\342\352\345\365\353\230\4P(\346\373\375" - #"\301\324\376I\266\260\361\343\335\215\357m" - #"M$\261\37dZDi@\255\20\341\27\37\31\275\"@\340\0040g\314\201B" - #"|2\257g%\314\233R\2768>>vmk;_\310\245if3\253\224\32" - #"\f\206\372\310\a'Z\315\275(\216\264\321\0000" - #"7?\263\261\272\31\307\261Ml\234\213\212\263a\356" -) 186 -( - #"D\344\346\261zgu\30\242\212r\16\311\1\v\2022JE\310!r\250|A" - #"\253}\305\3364\301\235\272\366\276\351\211" - #"\373J6H\3420\212\2020\f\203v\273\323\357\r\32243Z\347\3629\245\324" - #"\240?4\271\\\214\b\316yD\f\242`\345\302e\357\2512V\332\335i\256\257" - #"ni\255\347o\232\315*Y\206\331\235O\36o\355\355\241\306v\273W\252\24;" - #"\333\203\3469;6U\ff\263Zu" - #"\334fn\257\321\256\216\215\271\314\31\16" - #"\252\225\361~o\320\334m\205Q\330nu'\247j\265z\25\21\367Z\355~\177" - #"P\251\224\376\37\251\307\277\272\326K9x\0\0\0\0IEND\256B`\202" -) 0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" -0 0 15 3 6 #"define" -0 0 4 3 1 #" " -0 0 14 3 10 #"grass-look" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 2 29 4 1 #"\0" 2 -1.0 -1.0 0.0 0.0 0 9 500 ( #"\211PNG\r\n\32\n\0\0\0\rIHDR\0\0\0(\0\0\0(\b" - #"\2\0\0\0\3\234/:\0\0\0\6bKGD\0\377\0\377\0\377\240\275\247" - #"\223\0\0\17\267IDATX\205%\227Yo]\327u\307\317\331{\237y\274" - #"\367\334sg^\222\242H\212\32\"Y\36\342!\266\343(\215\v\a\t\320\300-" - #"\222\242c\2\24E\363\220\227~\206~\201\364\245}\353c\201\240\1R#h3" - #"9NjK\261\24\331\262F\222\22\305" - #"\341\362\316\303\231\207\275\317>\273\17\374" - #"\6k\375\327\177\375\326\372\363\337\376\361" - #"F\226\345v\305\204\20\3469^\337X\r\374p1_\372^\20\370\241[w0" - #"&\224\322\376\321\350\325\257\\_\314\227" - #"\252\246\0\0TM\35\364G\313\205\347" - #"\326\235\203\247\307U\307b\214]\270\264" - #"\305q\34\307q\267o~6\354\343\257\277w\3050\215\311xZ\322\322m\324\16" - #"\17\21676\327\2634\333{\362\f\0" - #"\36\26\335\3457\277}\343\323O\356b" - #"\214\213\202\n\202\0 \210\343\4\347\230" - #"\a \211\23\3234\32M\367\302\245\315" - #"\243\303\223\311h\3466\234(\214\a\375" - #"\321\253\257\277d\230:\317so\274\371" - #"J{\245\325l\3251\306\34\307\321\202" - #"\366\326\2737\336}\271\336p\177\376\263" - #"_\225%\5\0L\306\263J\325j4\335\321p\"\313R\34\247\374\17\177\366\326" - #"\a?\375\335\233\357\\;9\36\310\262" - #"\264\276\261\312q\334x4\361\275\240\323m\35<=\264ls2\2321\306\2420" - #"\375\253\357\277\377_\377\371\201\333p." - #"]\271\360\321\257?y\355\315\227\212\202" - #"\206AX\226e\273\333\362\275\340\254cMS\37=\330\245\224nl\2567\32." - #")\212\242(\206\247\243_|p\337\252p\257\277u-\f#H\273SV" - #"\26\355n#\216\23B\212\376\361)\301XU\225\345\334\e\364\307;\227\266" + #"\6\0\0\0\214\376\270m\0\0\17\277IDATX\205U\230k\214]Wy" + #"\206\237\265\326\336\373\334\317\231\273\347\342" + #"xl\217\355\330\236\304\271\30r\241I(4D\242\210\224[TAT\252B\213" + #"\250Z\225V \265\245\250J\372\243\5!ZU\324I\243\240\"~\320?\5\251" + #"R)PZn\201\224\204\220\330\220\200" + #"\215=c\317\214\347\342\271\234\231s?{\357u\353\217}\306\241[Zgk\237" + #"}\373\276o\275\353}\337o\213\207?" + #"3\355\363\371\34*\b\b\303\200\270\0373>1\306\316v\235~?fo\247\201" + #"\aN\335v\2340\214\350t;\24\2539\312\3452?}~\221\365\327:\264\256" + #"[Z\365>\2\b\303\220^7\2452T \356\367\31>\224\343\370\203\243\24\306" + #"<\345J\t\23;\n\305<8(\225K\354\356\356\21\4\1A\240\270\276\264\6" + #"\2\202 \240Z\253P\e\252\22\214O\214r}y\215\332P\215r\271\210\265\226" + #"\265\325\rJ\345\"\"\26\234\274\3558\227/-\222\313G4\232M\232\365\16/" + #"|e\227\e?\325\34\21%\346gG8q|\210[\177c\2040T\b)\20" + #"B\240\265\243\321N\270\270T\347\207_Z\347r\322\340\360\275%&\356\b(U" + #"r\324\206j\320\355\22\205\21A\240X" + #"_\337\344\304\251c\\\372\305\25\216\36" + #";\314\302\345\253\250@!\336\373\314I" + #"\337\355\364(\226\n\264\232mJ\345\"" + #"I\234\"\a/\212\343\204\326^\233\273" + #"\357\277\235\205\237\255s\376\213;\234\316" + #"\225\270w~\234\a\316\316`\275\0)AJ\204T\b\1\2\201\0\20\240\4\24" + #"C\305s?Y\345\271\363k<\277\276\306\331\17MP\233\216p\32" + #"F\307\206YYZ\5\340\370\255s\264\333\35\352;\273T*e\372" ) 500 ( - #"\2420\246\224J\212L0\371\315/\356" - #"\377\345\337~\263\323m-\227^Y\226\207\a\3075\327\21%\261\177<@\bA" - #"\b\31c\34\307\335\374\375\235\232[\205" - #"\20\2\0\3428\211\302(K\363\301\351" - #"\350[\337y\313\264\224\305\334\303\230\240\212c\21R`LTUy\355+\257p" - #"\34\367\351\255?*\212\262\262\332\31\364" - #"G\212\252\254\235\353\335\372\277;\30\223" - #"\252c\275\365\265\313\373{\317\24E)\313RV$J\365\375\335\3E\221w." - #"m-\27^Q\24\20BM\327\4\1\1\b\334F\355l\242g\325t{\355\317" - #"\356|\221\304\311\352\372\n\306\4~\365" - #"\a;\25\307Z\314\227y\216o\376\376" - #"\316\356\343}\216\343\0\340\21\202\215V" - #"\375\227?\277y~\273\327\355\265\303 " - #"|\343\355Wo\337\272\253\e\332\37>" - #"\276G)\31\17\247\272\241\371\313@7\264\3337\277h\266k\204\24Q\30s\34" - #"w\361\312\5\210\240i\32y\216\333\335" - #"\346\352Z\327\256X\375\223!\317s\27.n\r\acI\22\341\366{\25\216\343" - #"\fCw\234\252\357\a\202(@\0\36\337?9\267\331\241\5m\264\252I\234\354" - #"\357\36\\\276\272s\373\346\335\213W\266" - #"\247\223\271\343\332q\224l_<\37E" - #"\361\326\316\306\243\373\373\246\245m]\330" - #"\320u-\317qY2Y\221\26s/\211\223v\267\365t\357\271\357\5\343\321\264" - #"\267\3329\267\271vtp\234$I\377" - #"h\0\257~\247\305q\\\222\244\263\351\3344uJ)\245\24B\3466\234\242(" - #"\2?\22D\241,K\204 c\334r\341\3611\312\310\350\20\306\30F\307\206i7;\224\312ez\275>\371" + #"b\216R\276\306\306\177$\374\371\273\16" + #"\262\\\217I\265\3059\217G\200\a\357" + #"E6\0\234\307y\360\16\262\303A\260d\347=`R\307\302F\213s\177z\17" + #"\313_\355\242|H\30\5\314\35?\302\325\205%\16\3362M.\27q\313\3544" + #"\225j\31\271\267\333 M5\345r\211" + #"\225\2455\246\17N\321l\264\20B\220" + #"\352\204\27\276|\203\273\17\344i%\32" + #"m\f\316\372l\332\234\317^\352<\316" + #";\274\363X\357p\316\341\234\305:\207w.K\306\373\233{\353<\306Z\366z" + #"}\368\\\345\322\327c:\235\16+Kk\24\213\5\244\224\24\212y\272\335\36" + #"\215\275&\262\333\355a\255%I\22\242\\\304\312\322*\245R\221\\!bea" + #"\e.\264\271o\276L\242\301Z\217\321" + #"\26c\34\3269\214v\30\347\261\326\242\215%\325\206TkRc\320" + #"\332\222ZCj,\332z\254u\30\353\320\326b\255\243\333\323\274\365\r" ) 500 ( - #"\351-}\204`\222\244\252\252\30\246\316" - #"\30\v\374\20B\240(\262$\211v\305\3029\236M\27\202 \333\210\343D\226" - #"\245\242(\262,[\314\274\202\24<\0Q\224\20L\fS7-]\226eh]" - #"+l\3334M#\212\342\341\351\4\0\336q\253H\200\201\37\265;-Q\22x" - #"\216\3438NQ\344\300\17\233-7IR\2141\317\363\5)\2?,\212\2\347" - #"\304\363\374\222\226\206iDQ\254\e\32" - #"!D\226\245\247\273\a\226m\"\204\26" - #"3O7\265\202\24\202(\310\262\324\356" - #"\264\372'\3X\271\316\276\364\302\245\361" - #"h\262\377\344\344\312\265\355\316J{\320" - #"\37\236\231s:\231\263\262\f\202(\364CQ\22\275e\220\304I\311JB\nE" - #"UdE\302\230\304q\352\326\2358Jx\36xK_\20\4\0\200(\n\0\0" - #"\3136\3?\304\230l\357\234\217\243D\323U\0@QP\216\343\363KQ" - #"\24\315vc4\30;\265\252 \bLa\37\177\364i\273\333\240\264$\244`\214" - #"\1\0\20Bi\232I\262\b!\0y\216\5\1\35=\357k\272\262\261\271\316\363" - #"\334\306\346\272\267\364\313\262|\266\377\374" - #"\360\340x\357\361\301l:7-C\3235Y\221L\313\210\302\364\205\27" - #"\277\304q\334\311\321i\236\345\242(" - #"\330\25\253\346:\275\325\256(\211U" + #"\243\24\27\f\215\235>;\333u\204\24lo\325\351vz\344r\21\225j\5Y" + #"\e\252b\264\301\30K\24\205\0\\]XBHOc\301RP\202~\352qx" + #"\274\27\244\326`lv\275\266\26\243S\2646\244iJ\232\32\2224%Itv" + #"\234\30\214\326h\2551&\273\307\30\207" + #"\31$\320\350\246\224\2\301\362O\232L" + #"\35\32\247\323\356\322n\265\251\326*Xk\251\rU\220\373T\22\4\1B\b\274" + #"\367L\3372E\263\323d\365E\303o\336Y\315\2t\36\353\a\323j\34\316Z" + #"tjH\22C\22k\3428%\211\23\222~B\322\217\211\343\204$I\210\223\224" + #"d\20\2543\26\234\305XK\2525\255v\314\273\356\31f\373\34\250\232\334l\3251&I\222" - #"RZ4\32\365\243\303\23\3232*U\2131\326j7\335\272-J\242S\2534" - #"[\215\347\317\216\335\206Su\354(\212a\373\r\30104LH\325\251,\346\313" - #",\313\274\245oWL\204P\236\343(\214\0@\254\244\202(\214\6\23\335P\203" - #" J\2234\212bQ\24\30\307\332\335\346\331U\365\226~Yr\204\340z\303\235" - #"Mf8'8\307\303\301X\222\2458J\346\323" - #"\371\321\301\tcl\347\322&B\260\352T\340W" + #"\341i\367\341\277\277\277F\247\327\307X" + #"K)\237cv\246\306\203\267\r\23\353" + #"\4\213Gx\201\360\231\\Z\347\301y" + #"\224\204^\354\351\244\216\355\206e\353\331" + #"\e\314\377\266f~f\234\244\255)WJ\4\235v\227\203\263Sl\2564h\274" + #"`\310\221\341**\276\3657\213\244" + #"\313\26\251 \222`\235\300\252\201\24\b" + #"\301\361\251\34\207F\24u?\311\307>\365Y\36~\370aFje~\360\277\257" + #"\360\261\307\316rx&\217q\257\323\264" + #"\302\260ffy\361\302\2\316\303\362\312" + #"\6\237\371\333\277\346\342\17\376\25\355\24" + #"\257-\367H\255\347\310xH+v\314:Gj,k]I\373\220\344\241OL" + #"\22\312\34\201\f\241\261li/[B\5J\n\20\36/\340@Eqr2b" + #"q\307pi-\346\247\313\236O\376\325" + #"\373y\317\243\357 \b\202\314X,\376" + #"\222\335&\24\3136\363\177\3\2226\332" + #"\260\331\333\30\30C\313\370H\231\371\333" + #"\356\340\231g\277\210\360\226\371C\5\216" + #"O\344(\347\340\271\313=\224PT\2" + #"\301\250\364l.\e\322\255\210\374A\201" + #"\272\353\375SO\374\327\223\v\310\276G" + #"(\201\222\36\205\304\1\371Pr\313\220bz$GD\312;>\360G\374\313\27" + #"\236\341\225W^\341\267\36}\224\335\335" + #"]\356\270m\236\363WV\370\366\367/\20HK/\261,\337\260\264]\221'?" + #"\375O\23486\207\367\236\337\371\340\a9\367\3249\236" + #">w\216\346\316\22g\306\272x!\260\6V\366R\206\21" ) 500 ( - #"\376\356|\236\347I\234\245I\306q\314\367BMWUM-K\372t\357y\315" - #"u\316(\266Xx\242(2\306\342(AH\3408\276dl>]\236\351\266\367" - #"\370\240\335m\245i\3061N\24\3050\214%I\322\ru\330\37SJ\1\340\5" - #"Q\0\0\30\226nW\254\345\302K\323" - #"\fn\376\251]\20\252\250\262\200\20\245" - #"%\22\20c\234(\tY\232\327\\\247(\b!e\232\246Y\232\313\212H\213\302" - #"\2519\263\311\\\3235QD\b\301\252c\207A4\35/\332\335\206$\211H\20" - #"\306\243\261\246iEA8\236o\265\353" - #"W_\270\34\206\21D\360\f\264\336\322\317\262\2141\6\2624/\313\"M2E" - #"UZ\355F\340\205I\234\322\202\16\372" - #"c\204`\236\221,K\355\212\245j2\316\tD(\360\3US\316\376g\335\320" - #"\262,3L\343\374\366j\34%\214\361Q\30\26\204FQ\4\0 \230@\b}" - #"? \230\34>;\241\224J\262D)UU\305\264\f\270\372\216\252\351\332r\341" - #"\305Q\254\351\352x4\243\5].\202k/^\t|\237168\31s\34\227" - #"\245\231\254(\232\246ei\16!\217\20" - #"\342y\16c\222\246y\236\343v\247\31\205!!8\313r\335\320\31+1\306\242" - #"(\0\b\367\236<\5\0tVZ\315v\303[\372\315V]V\344\331t\16\354" - #"\212\305q<\317\363n\243\366l\357P\24\5US$IPT9\317i\226\341" - #"\336z'\n#\b\201\246\251H\200\0p<\317\a^Hi\t\0o\30:\245" - #"t8\230\264\273\315J\325\3468\256,\313\265s\275$Ny\236?9:\325t" - #"\2151\206\20\214\243\30\0\200\4t|t\272v\256\a\233\257#\b\0\22\220e" - #"\31eYRJ\355\212\305\3\376\336\37\37\v\"\f\203\270\325\251" - #"\37\37\16%Y\221\25a4\30\3\b)\245\20A\177\0312\306" + #"D\n\214sx\3\257\276\274\307]\357" + #"\235B<\366\364\355\376\337\376\360UB" + #"\231e\256D&\356\306z\306\252\212339\202P\360\322\245.Wvb\256\\" + #"\3729\233[[\314\315\315\241\323\24\251" + #"\24\265Z\215\37\277\3642\377t\356\363" + #"\364\373}\36y\333#<\376\370\343H" + #"\1q\34\23\4\1\213\213\213\214\217\217" + #"s\346\314\35|\350\367?\214\276\374\25R\27!q\374h\261\307!/(\206\236" + #"V\342\331Ia\261gy\347\337\37'hluo\272\16qS\332\308\223l" + #"\312R\3Q\16>\376\361\217s\361\342k\274\365-oa|l\2148\216\1\250" + #"\357\35403u\200\177\374\334\347\220J" + #"\21\3071\33376\260\3a\316\347\363" + #"\274\360\342\213\374\317\267\277\315\233\37z" + #"3\27_\273\300\221 S\0341@\255\367\36o=\271P\22\31C\4\244=O" + #"\220\352\364\246\t\361b?\310\f\203\355" + #"\304\363\263\265\204z\317\221hx\372\237" + #"\317\361\320\3\17R)\225\330\333\331!" + #"\325\232\233\233\20\344\302\20\244\304h\215" + #"\265\366\346\251~\30R*\24p\326r\356\351g\330\335\335\346RA2R\16\230" + #"\254H\22\233\3315%\5rP\226\20" + #"2\251\213\202\20G6\265\336\201\6\254" + #"\313*\232\364-\326I\246\252\212\231\221" + #"\220^\234\222\313\3479rx\216T\e\2146x\371\227T\253e" + #"\214\326x\262\226\340\2367\274\221n\354\330\\\371;\3569Tfe[\263\276g" + #"\270^\327X\347i\n\230*H\16\25 \n\24\n\203\265\226`\277\n\36\201\20" + #"\231GSY\3659PU\334>\23\1\2\25\bF\313Ez7\236\343O>\372" + #"=\16\35\235gr\346\b\371B\211\335\235\r\226\256]bDmqv\252" + #"\304_|\342w\231>t\232\311\351" + #"\375\363\353\\[\274D\321\336\340\376\243" ) 500 ( - #"\272\275\266$K\207\317\216\252\216\235\347" - #"8I2\234cE\221\355\212\225e\271\252)\206\251K\222T\251\332Q\30\27E" - #"\221ey\24D\233\333\e\360\3747\254\371la\333f\232\244\34\307\373K\37c" - #"\222&\331\225\27\266\363\t\223z\323" - #"\35\364\307\232\246<\333?|\353\235/" - #"\337\277\367\30\347X\3214B\230S\253&qb\30\232\357\a8\307\203\323a\24" - #"&\216[)\n\232\304I\253\335\0\20" - #"\230\266^\251\332\206\251\213\222X\24\5" - #"\301\0046_\203\264\244\235V\23\tPU\344\262,EEr\233\356\307\37\335<" - #">\30;\256\5\20hw\e\317\17\372/~\371\205\337\376\357c\313FG\317\373" - #"\3476\327(-\237<\334\333\334^[.\374\222\321+\327.}\374\333[+k" - #"\235A\177\334]m\323\242\3448\326[\355\234e\327n\257%J\242 \n\367\357" - #">\324t5I2\330z\35!\21-\27\236\242*\254d\214\225\244\240\343\341T" - #"\221\305\267\277\376\32\311sQ\225B?\372\306{_{\364`\367\306" - #"\273/lno\234\366\307\0\2\216qU\307RT\235\261\322\260\365" + #"U\264\225T\362\212\223S\216^lyy%A%\236\255\3041\21\202\20\22\0" + #"\235\30\2\37\245\3[\225\31\316Pe" + #"\213\305\271\f\224\3328\20\2\207\4\341" + #"(\26\"\336tR\241\365\25\222\353\277" + #"$\1J\271\200\373\216\344\310\205#8" + #"\17\217\334\35\321\351.\321\273q\205\226" + #"\361\24\2\301\331\203!R\16\221\244\16" + #"k\34\306\202\321\216HB(a\266 \310+\205\366\220\30\217\3\306gk\4\23" + #"\2635j3\273\264\326\fb\20\334>h\361\36\357\301\343Qdf\324Z\2171" + #"\236(\f)\26$J\n\204\24x\a\375\304\355\303\2210\f\251\5\341\300a" + #"\24\342\234C\247\232\251\231I._\\" + #"\240T.\21\4\212\332p\25\213a\267" + #"\321\242\265\326\247\32\24\250\277\332F\355" + #"\bt\263\207\213\r\312B(%2\0+\300!\260\241 \254\26h\347z\4\263" + #"\202\3\307&)OE4\353-\362a\236(\n)\24\362\364\3731\355V\a\245" + #"\24\205B\236\\>\207\265\226\235\355]\202B!\217\20\240\265A\bA\230\vY" + #"\274|\rc\262\317_\333[u\256/\257\243\224\342\320" + #"\321\31\222ZB\"\22\336\370\221yv\367\366\20J\320" +) 88 ( - #"\273\255\225^\347\27?\377\315\365\227\257" - #"\336\277\367\350,6bL\fS?:\350C\4\20Bi\222i\272\342\324\252\307" - #"\207\247\0\200\303gIo]\226\25\251" - #"\263\322\352\37\17Z\235\306\240?\212\243" - #"\364\334\371\236\333\250=~\260\267\271}n2\236\375?\24" - #"\252)\356\300\30w\222\0\0\0\0IEND\256B`\202" -) 0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" + #"h\264\251\324\31247\273\324/\246\fM\226\tg\22\306F\206I\23\315\336N" + #"\203\221\241!t\242\t\\\310Hm\230N\273K}{\227(\27\321\330m11" + #"9\306\330\370\bB\b\366v\et:]j\265\n\377\a\236" + #"\235\2\375\275\222\317\24\0\0\0\0IEND\256B`\202" +) 0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " +0 0 14 3 10 #"grass-look" +0 0 24 3 1 #" " +0 2 31 4 1 #"\0" +2 -1.0 -1.0 0.0 0.0 0 10 500 +( + #"\211PNG\r\n\32\n\0\0\0\rIHDR\0\0\0(\0\0\0(\b" + #"\6\0\0\0\214\376\270m\0\0\21\300IDATX\205=\230\331\217\34\211}" + #"\337?uwU\365Q}\367\364\334\34rx\314\236\334\325J{Jk\371H," + #"\310\27\344+p`\310F\202 ~\260_\374\224\27\"\17\371\a\364\22\4\360S" + #"\20\344\200a#\216rm$mV\226\245\365.\315].\271\344\222\\\222\303a" + #"OO\367\364U\335]\367\351\207\36\261" + #"^\v\5\374\352\367\373\376\276\307O\370" + #"\265\357\355\345A\20bU\313H\222D\30F\354\356m\263\230/\231Nf\314\355" + #"\5\213\371\222f\253N\24\305\244iJ" + #"\357\311\200\257\275u\225\351d\206a\352" + #"\210\242\210a\32\364{\3fS\233f" + #"\253\316\243/\217\250\325+\344y\316\245" + #"\203}~\376|\374\263O8\351E\374\342\257>O\251\\\342t8\"K3\232" + #"\355\6\207\217\216\330\273\260K\340\a\334" + #"\377\342!\242( \354\375\v\362?\370" + #"\356o\362?\377\373{\24\313&\212\242" + #"\260\261\331EVd\306\243\t\313\205C\24\305$qL\275Q\243Z\263(\226\212" + #"<\270\367\220\311h\306\305+{,\27\16s{\301\333\337x\235\321h\202\263t" + #"\330;\277K\24\307Da\304r\351\0" + #"\220&)\212\252\260\276\336A\224$\376" + #"\313\177\374k\252\2652f\321$\bB\352\215*\273{\333<\372\362\220$N\30" + #"\217\246\b\177\3627\357\344\337\377\353\37" + #"\363\366\273/\361\364\250O\241\240\261\273" + #"\267\r\300pp\312\334^\260\276\261\306\243/\17\251XeN\ac\362<\307Y" + #"\372\374\301\37}\207\277\372\257\337\247\331" + #"\256s\360\374%>\370\341Oy\375\355WI\222\224\345bI\226et7\326\230" + #"\333\213g\0354M\203;\267\357\221\246){\27v" + #"i\267\233\304IB\222$\234\34\17x\357\373\267\250" +) 500 +( + #"T\341\215w^b\271t\220\322\215\321\265\244\273\321\341\306Gw\350n4X\314\35\332kM&\243)\255N" + #"\203\a_<\341\352k\a$IJ\30\204\224+%\332\235\26\213\305\222R\251\310" + #"t2C+h\24\n\32\256\353\361\360\301!\262,q~\377\34O\36?\245T" + #".\"\374\356_\34\344\0\222$\241\252*wn\337C\24ETU\341\360\341\230" + #"\257\377\342\313\344yN\30F\344y\316" + #"\361\323\23\236\177\351\n\267>\275\303\301" + #"\v\227\350\35\365\21\4\201\331\324f\357" + #"\302\16\247\3031\233\333\353|\364\323O" + #"0\314\2\257\275~\225<\317\31\16F\b\202@\253\335\340t8F\222D6\267" + #"7\270}\363.\222$\3428.\233[\3534\333\r\36|\361\220\345\322a" + #":\266\221^\374\255\265k\0\236\3473\36M(\227\213\244iJ\232\246H" +) 500 +( + #"RN\263]'I\22\26s\aEU\310\262\fY\226\310s\230Mm\4A@" + #"Qd\n\5\rQ\24I\342\204R\271H\222$(\212L\265f1\31OI\323" + #"\fE\221I\223\24Q\24\250\326\252\330" + #"S\233\351tF\273\323\"\216\343g\243" + #"\236\333\v\3428\241\331\252!\aA\310ljcU+\b\202@\30Fg\30\263" + #"\260gKfS\233b\311$\317s\306\243)\353\e\35\354\331\34Y\226\360<\37" + #"\303\320)\225\213\344y\316b\276D\222" + #"Dt\275\200\246\251X\325\nQ\0301\36MQ\24\5\331*\341\272\36\205\202F" + #"\222$\4A\300tl\223\304\t\202(\3428\36q\24S*\27)W\212\24\n" + #"\5\304~o\200i\32\230\246\1\300\311\361)q\24\243\0254\332k\r\246\23\e" + #"\3234\2517\252\224\313E\3020\242T" + #".\342\373\1\335\3656Y\226a\317\346" + #"\317 0\267\27\364\236\366I\222\224\376\361\200\311xJ\275Q#\216cDQ$" + #"MSDQ\344\356\31\224:\335\26\313" + #"\271\213\242\310\344Yv\366^\240\273\276" + #"\306d\217\353x\230Ec" + #"\5\223$\5\300\266\27\210{\373\333<\270\367\20EUh\257Y\350z\1\263\250" + #"\3\20G1\273{\333\4~\300\334^\240\353\5TMe:\2661\213\6I\222" + #"\220\245\31\345r\211\243\307=\6\375S" + #"t\275@\22\307\364\216\372di\6@\236eH\222\304\351`D\251\\\"\317s" + #"\254j\5\253Z\301\367|\3020D\226%d" + #"E\306uW\205\16\a#\312\225\22r\261h\"" +) 500 +( + #"\3132\242(0\35\317Q\324>W\236\273D\236\3474Zu\6'C\256~\345" + #"E\362<\307\236\331\314\355%\202.\20" + #"\3071a\20Q\337\2501\34\2140\212\3063*\t\303\350\31\320\223$\241\323m" + #"3\350\17\2517j(\212B\256\347\374" + #"\335\a\37\321\335h\223\246\253\t\344y" + #"\216(\212\310\262\214\357\ah\5\25I\22\21\3030BQd\236<\356a\26u" + #"\366.\354\"\b\260wa\27{6'\3132\36>x\314\341\243#\356\337}\264" + #"\332\364J\t\263hR\3205\312\225\22" + #"\316\322\347\345W^\0\340\351\223c\302" + #" DU\25\254j\205F\263\316\326\366" + #"\6\252\246R\253W\271\373\371}\346\366" + #"\202r\245\310r\341\20G1\213\371\22" + #"\317\363\211\302\210$I\20E\221F\263" + #"\316b\356 \275\362;\e\327\216{'" + #"\234\236L\371\205_y\eY\226\370\374" + #"\326=\266\266\327\211\242\bY\226Y." + #"\34\362\177\373\376\207\274\362\332\213\244" + #"i\212=\233\243i*\235n\233,\315\30\16F\330\2639[\333\eHW\177{" + #"\343Z\22'\324\352\25\202 @\24$*V\t{6\247\337\e\342:\36V\255" + #"L\265Za6\265\251\326,\232\255:A\20\221g9" + #"FQg<\232\341.\3\2420FQd\3428>\303" +) 500 +( + #"hH\226e|\363\227\277\316\347\267\357\21G1\256\3432\36M\251\325-\6'" + #"\247t7\326\330\336\331d2\231\221&)Y\226R,\232x\236\217 \bH\372" + #"e\367Z\265^ec\263K\232d\fNN\231Nl$I\244\325i\0\2k" + #"\335\26\206\251\363\340\336!V\265\314t" + #"b\223\347\31\212\252\322l\325\361=\237" + #"R\331\240\325ip:\230P\261\212T*e\234\245\313\302^\"\313\22\256\353Q" + #"*\27Y.]\262,\5\4\6\375\21\252\246\340:.\366l\301\340xH\226\347" + #"DQDvFk\322\333\337\335\277vr< \a\32\315:\375\336\200\212Ub" + #"\377\342\371\225S6\f \243P\320\310" + #"\363\214(\212\317\n\314\231N\246|y" + #"\357\204\356F\203\235s[\310\262D\305*\242j\5*V\tA\20h\2575\371" + #"\364\372\347\354]\330\346\352\253/\362\350" + #"\313C|/@\325T\366/\355q\373\323{\244YJ\305*\23\3071\25\253L" + #"\24\306\b\202@\232fH\277\372\247\257" + #"\\\e\234\f\321\n\32\276\347\23E!\223\361\24UU9:\216\343\242\252\n99\335" + #"\215\3163\v\267R#\210\343\210V\273" + #"\311\370tL\24\256\322\336I\177\205}" + #"\327\361\230\214&V\265\202a" + #"\26\210\302\30I\226Y\314\27\30\246\376,\367\26K&A\20P*\2278\177q" + #"\e\327\361V?\266\\\222\304)\216\343 \212\"q\24#I\22\363\371\2028\212" + #"9|\370t\25i\v\332\252\243\206N\271RB\214\242\b\255P\300u\\\6\375" + #"\341\231L%\4~\300\341\243\36/\274" + #"|\200\353\270\b\2\214\6\23\306\247S\\\307CQUL\263H\226\201,KH" + #"\222H\236\347\370~\300t2g6\265i\265\233dY\202\347.\317\212.\"I" + #"\3423\31\213\242\230O\256\177F\20\204" + #"\354_\336c\347\334\26a\20\262\261\331" + #"\245V\257b\317\346\210V\265\2\b\b\202@\263\335\340\341\375CTU\3010u" + #"4MA7\n\204aJ\20Dl\355\256\343,\35$I\3044\rdEB\24" + #"A\20\4\26\366\2224\315\20E\201Ri\25\274N\372\247t7:Tk\26\0" + #"Y\226\261sn\v\317]\25\370\364\3111fq\225wdY\302uV\316HV" + #"d\216\236\34\263sn\vq:\261\211" + #"\302\210b\251\210a\350T\353\26\312\231\2273K&?\370\337?\301Y:\314&" + #"sJ\345\"\316\322'I\4\3224\341\370\250\377\314p\252\232\302d4\303u<" + #"\252\265\n\255v\203\223\343\23|/8" + #"\343Xp\35\27\327q\331\335\333\"\3132\352\215*Vue\333\312\2252Q\264" + #"Jv\223\361\224$\216\261\252\25\244\363" + #"\277\\\2716\31O\261\2542\276\347\3" + #"\2\363\331\234(\212\361\275\200\347_\276" + #"H\30\206\344\371\312\26Uke\2420" + #"\3050Uj\315\32\316\302\241\337\263\331\277\274K\30\370\244\311j\271" + #"\nz\201\354L\273\2535\2138N(\226L\346\366\342Yp2L}" +) 500 +( + #"\345\320\1A\340\314t\24\31\217\246\264" + #":M\246\223\31\322\273\377\362\312\265O>~\314ra3\235\314Y.\34Z\235" + #"\6\343\341\214bI\347\235w\337\244\337" + #"?\241\331j\220$)y\16\215\246\205\357\207DaD\243YG\24S\16\37\36" + #"\263\267\277\213a\32<\376\362\210f\273" + #"\201n\350\370\276\217(\211t\326Z\b" + #"\202\2602\265\256\217\357\373,\27\16a" + #"\30b\230\6w>\273\217\357\373\254o" + #"\254\201\300*\346\236N\220eY\346\265" + #"7\366W\256Y\0Q\20\250\326,\352\325*3\333\246\331j\340\314W\324\" " + #"\340-=Z\235&\375\336\20\323\324y\370\340\220w\336\375*\267n\336%\n#" + #"t\323$\216s\352\215\32\236\353Q*" + #"\231\314\347\v\2420\242\177|\202\263\364" + #"\2507\253$I\212\347z\254u\333\210\222H\331*R\255Y\224\312ETM%" + #"I\22\342(F\354\35\35\23\305\21[\233\353\324\353\26\265Z\205,KQt\225" + #"\235\363;\374\267\377\364W\34\37\215\221D\21I\2218wq\233\303\307=^}" + #"\375\25n\177:F\310\341\307?\372\220" + #"\265\365\16\222,\361\371\315;\\:\330" + #"\345\311\343\36K\307\341\302\245\363<~" + #"\360\4E\225\361\275\220\235\275M$IF\222D\316\357\357>\313\"\27.\356b" + #"U\313Dq\314\255O>\307s=\2224Cx\347\3376r\243d\220\2041\265" + #"F\225<\313\311\362\224\34\221\305\334A" + #"\327\24\256<\177\211\243\307G$B\216" + #"c;\274\365\2157\370\331O\256\263\277" + #"\277\215$)|\360\376\207\324\233\26\222(\"\b9\5\275H\340\373\224kEN" + #"\216N\330\334Z\347\301\375\207\204AB" + #"\255Q\"\2122\302(\342\312\301>7\376\376\26\2)\227_\270H\226\345\204Q" + #"D\32\245\244Y\212Y1\221\256|\273yM\24\5" + #"Dqu\257\23%\tA\20\211\302\20\337\367h\265\233" +) 500 +( + #"\374\315_\376\204\335\v\35\226s\227f" + #"\253\311\17\376\317\a\253[\n\2\255v" + #"\235\223\223\1\205B\2014IY\333\350\262\260m\f\263\300h8er:\341\270" + #"\177\312\271\363;\224*E*V\5M\323\330\332^\247\323ia\224\f\266v\267" + #"\b\202\220(\212)\26M\262\354\354$\374\345S\304V\273A\253\325\244T61" + #"\f\235<\317\t\374\0Y\225\271\362\374" + #"%\0\276\361K/\362?\376\362\26\25" + #"\253J\251\\\342;\277\377\233|\375\233" + #"_\343\335o\276\311\372F\227(\214\30" + #"\235\216\320\215\2?\376\341O\321\r\235" + #",\3M\321X:\21/]\275\202\246\251<\367\374e\262,\343\312\301EF\303" + #"1\377\341{\337G\222%>\372\351\rN\207cdY\342\343\237}J\226e|" + #"z\375\26\313\205\273\32\261\252\251\24\n" + #"\32G\207\307t7:\317\244k6\265" + #"\31\236\214\371\326o\374\22\213\371\202~" + #"\357\4\317\v\351\256wx\375\3157\370" + #"\367\337\373\v\262,\345\317\377\315\237\361" + #"\303\367~\300x8\306q=\20\4\302" + #" D\3234\276\365\353\377\224\217\377\376" + #"\343\325\267n\300\332z\233\e\37=\341\327\177\373\r<\327c1_\322;\32\0" + #"9\305\262I\275Yess\235(Z\5/\351\233\377\352\271k\272^\240l\225" + #"\271|\260\217\357\373\334\374\207{\354]" + #"\330\242X2\251\325-\306\243\t\225J" + #"\205\2337\356\360\235\337\3735\3428\346" + #"\375\37\274\317\306\326\32\325Z\231\367\377" + #"\337\377\307q\274g\324\22E\21\317\275" + #"x\205A\177\200 \346\334\275\365\200\177" + #"\376\307\277\307\366N\27\253f\321\356\224" + #"\370\374\326\27\234;\277\303\315\ew\370" + #"\327\177\372G\224\255\"\212,3\267\227" + #"\347\316o\321l7\270{\373>\27.\236\343t8\346\37" + #"\1\177\211o\367m\20\16\314\0\0\0\0IEND\256B`\202" +) 0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" +0 0 15 3 6 #"define" +0 0 24 3 1 #" " 0 0 14 3 7 #"sc-size" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 1 #"*" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 11 #"image-width" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 10 #"grass-look" -0 0 22 3 1 #")" -0 0 4 3 1 #" " +0 0 24 3 2 #") " 0 0 14 3 9 #"num-grass" -0 0 22 3 2 #"))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +0 0 24 3 2 #"))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 42 #";; Functions for building the grass field:" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 6 #"mt-row" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 8 #"num-left" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 14 3 5 #"apply" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 6 #"beside" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 9 #"make-list" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 8 #"num-left" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 10 #"grass-look" -0 0 22 3 3 #")))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 3 3 #")))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 7 #"make-mt" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 8 #"num-left" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 14 3 5 #"apply" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 5 #"above" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 9 #"make-list" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 8 #"num-left" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 6 #"mt-row" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 8 #"num-left" -0 0 22 3 4 #"))))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 3 4 #"))))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 9 #"simple-mt" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 9 #"rectangle" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 7 #"sc-size" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 7 #"sc-size" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 19 3 7 #"\"solid\"" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 19 3 7 #"\"brown\"" -0 0 22 3 2 #"))" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 3 2 #"))" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 2 #"mt" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 17 #"place-image/align" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 7 #"make-mt" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 9 #"num-grass" -0 0 22 3 1 #")" -0 0 4 3 1 #" " -0 0 20 3 1 #"0" -0 0 4 3 1 #" " -0 0 20 3 1 #"0" -0 0 4 3 1 #" " +0 0 24 3 2 #") " +0 0 21 3 1 #"0" +0 0 24 3 1 #" " +0 0 21 3 1 #"0" +0 0 24 3 1 #" " 0 0 19 3 6 #"\"left\"" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 19 3 5 #"\"top\"" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 9 #"simple-mt" -0 0 22 3 2 #"))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +0 0 24 3 2 #"))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 11 #";; DATA DEF" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 13 #"define-struct" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 5 #"world" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 9 #"mole-time" -0 0 22 3 2 #"))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +0 0 24 3 2 #"))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 11 #";; Example:" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 6 #"ticks1" -0 0 4 3 1 #" " -0 0 20 3 4 #"1000" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 3 1 #" " +0 0 21 3 4 #"1000" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 6 #"world1" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 10 #"make-world" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 6 #"ticks1" -0 0 22 3 2 #"))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +0 0 24 3 2 #"))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 16 #";; Tick handler:" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 12 #"update-world" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 3 #"wrl" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 14 3 10 #"make-world" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 4 #"sub1" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 15 #"world-mole-time" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 3 #"wrl" -0 0 22 3 4 #"))))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +0 0 24 3 4 #"))))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 16 #";; Draw handler:" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 13 #"render-rotate" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 3 #"wrl" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 14 3 6 #"rotate" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 1 #"*" -0 0 4 3 1 #" " -0 0 20 3 2 #"45" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #" " +0 0 21 3 2 #"45" +0 0 24 3 2 #" (" 0 0 14 3 6 #"modulo" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 15 #"world-mole-time" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 3 #"wrl" -0 0 22 3 1 #")" -0 0 4 3 1 #" " -0 0 20 3 1 #"4" -0 0 22 3 2 #"))" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #") " +0 0 21 3 1 #"4" +0 0 24 3 4 #")) (" 0 0 14 3 6 #"render" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 3 #"wrl" -0 0 22 3 3 #")))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 3 3 #")))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 6 #"render" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 3 #"wrl" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 1 #"t" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 15 #"world-mole-time" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 3 #"wrl" -0 0 22 3 2 #"))" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #"))" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 14 3 11 #"place-image" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 9 #"mole-look" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 1 #"-" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 6 #"ticks1" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 1 #"t" -0 0 22 3 1 #")" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 3 #") (" 0 0 14 3 1 #"-" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 6 #"ticks1" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 1 #"t" -0 0 22 3 1 #")" -0 0 4 3 1 #" " +0 0 24 3 2 #") " 0 0 14 3 2 #"mt" -0 0 22 3 2 #"))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +0 0 24 3 2 #"))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 14 #";; final-state" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 4 #"main" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 3 #"cmd" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 15 3 6 #"define" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 4 #"yes?" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 4 #"read" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 17 #"open-input-string" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 3 #"cmd" -0 0 22 3 3 #")))" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 3 #")))" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 14 3 6 #"printf" -0 0 4 3 1 #" " -0 0 19 3 11 #"\"recording?" -0 0 19 3 6 #" ~a\\n\"" -0 0 4 3 1 #" " +0 0 24 3 1 #" " +0 0 19 3 17 #"\"recording? ~a\\n\"" +0 0 24 3 1 #" " 0 0 14 3 4 #"yes?" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 14 3 15 #"collect-garbage" -0 0 22 3 1 #")" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 3 #") (" 0 0 14 3 15 #"collect-garbage" -0 0 22 3 1 #")" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 3 #") (" 0 0 14 3 15 #"collect-garbage" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 2 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" 0 0 14 3 4 #"time" -0 0 4 29 1 #"\n" -0 0 4 3 3 #" " -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 4 #" (" 0 0 14 3 8 #"big-bang" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 6 #"world1" -0 0 4 29 1 #"\n" -0 0 4 3 13 #" " -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 14 #" (" 0 0 14 3 7 #"on-tick" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 12 #"update-world" -0 0 4 3 1 #" " -0 0 20 3 5 #"1/100" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 13 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #" " +0 0 21 3 5 #"1/100" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 14 #" (" 0 0 14 3 9 #"stop-when" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 15 3 6 #"lambda" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 1 #"w" -0 0 22 3 1 #")" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 3 #") (" 0 0 14 3 2 #"<=" -0 0 4 3 1 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #" (" 0 0 14 3 15 #"world-mole-time" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 1 #"w" -0 0 22 3 1 #")" -0 0 4 3 1 #" " -0 0 20 3 1 #"0" -0 0 22 3 3 #")))" -0 0 4 29 1 #"\n" -0 0 4 3 13 #" " -0 0 22 3 1 #"(" +0 0 24 3 2 #") " +0 0 21 3 1 #"0" +0 0 24 3 3 #")))" +0 0 24 29 1 #"\n" +0 0 24 3 14 #" (" 0 0 14 3 7 #"record?" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 4 #"yes?" -0 0 22 3 1 #")" -0 0 4 29 1 #"\n" -0 0 4 3 13 #" " -0 0 22 3 1 #"(" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 3 14 #" (" 0 0 14 3 7 #"on-draw" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 14 3 6 #"render" -0 0 22 3 4 #"))))" -0 0 4 29 1 #"\n" -0 0 4 29 1 #"\n" +0 0 24 3 4 #"))))" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" 0 0 17 3 24 #";; -- run program run --" -0 0 4 29 1 #"\n" -0 0 22 3 1 #"(" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" 0 0 14 3 4 #"main" -0 0 4 3 1 #" " +0 0 24 3 1 #" " 0 0 19 3 8 #"\"#false\"" -0 0 22 3 1 #")" +0 0 24 3 1 #")" +0 0 24 29 1 #"\n" +0 0 24 29 1 #"\n" +0 0 24 3 1 #"(" +0 0 15 3 7 #"module+" +0 0 24 3 1 #" " +0 0 14 3 4 #"test" +0 0 24 29 1 #"\n" +0 0 24 3 3 #" (" +0 0 15 3 6 #"module" +0 0 24 3 1 #" " +0 0 14 3 6 #"config" +0 0 24 3 1 #" " +0 0 14 3 4 #"info" +0 0 24 29 1 #"\n" +0 0 24 3 5 #" (" +0 0 15 3 6 #"define" +0 0 24 3 1 #" " +0 0 14 3 7 #"timeout" +0 0 24 3 1 #" " +0 0 21 3 3 #"300" +0 0 24 3 3 #")))" +0 0 24 29 1 #"\n" 0 0 diff --git a/pkgs/htdp-pkgs/htdp-test/2htdp/utest/info.rkt b/pkgs/htdp-pkgs/htdp-test/2htdp/utest/info.rkt new file mode 100644 index 0000000000..6054c16f0f --- /dev/null +++ b/pkgs/htdp-pkgs/htdp-test/2htdp/utest/info.rkt @@ -0,0 +1,4 @@ +#lang info + +(define test-omit-paths + '("sam.rkt")) diff --git a/pkgs/htdp-pkgs/htdp-test/htdp/tests/info.rkt b/pkgs/htdp-pkgs/htdp-test/htdp/tests/info.rkt new file mode 100644 index 0000000000..68b38e68e3 --- /dev/null +++ b/pkgs/htdp-pkgs/htdp-test/htdp/tests/info.rkt @@ -0,0 +1,12 @@ +#lang info + +(define test-omit-paths + '("convert.rkt" + "elevator.rkt" + "dir.rkt" + "graphing.rkt" + "gui.rkt" + "hangman-error.rkt" + "world-mouse.rkt" + "matrix-client.rkt" + "matrix-example.rkt")) diff --git a/pkgs/htdp-pkgs/htdp-test/tests/stepper/info.rkt b/pkgs/htdp-pkgs/htdp-test/tests/stepper/info.rkt new file mode 100644 index 0000000000..e5a52b91e2 --- /dev/null +++ b/pkgs/htdp-pkgs/htdp-test/tests/stepper/info.rkt @@ -0,0 +1,4 @@ +#lang info + +(define test-omit-paths '("jump-to-ui-test.rkt" + "big-bang-test.rkt")) diff --git a/pkgs/images-pkgs/images-test/images/tests/effects-tests.rkt b/pkgs/images-pkgs/images-test/images/tests/effects-tests.rkt index f0d06f34ec..9a83d63b8b 100644 --- a/pkgs/images-pkgs/images-test/images/tests/effects-tests.rkt +++ b/pkgs/images-pkgs/images-test/images/tests/effects-tests.rkt @@ -5,6 +5,8 @@ images/flomap images/logos) +(module test racket/base) + (define frame-delay 1/30) (define size 256) diff --git a/pkgs/lazy/tests/main.rkt b/pkgs/lazy/tests/main.rkt index 7b6baaea89..524fb1c755 100644 --- a/pkgs/lazy/tests/main.rkt +++ b/pkgs/lazy/tests/main.rkt @@ -2,6 +2,9 @@ (require tests/eli-tester "promise.rkt" "forcers.rkt" "lang.rkt" "space.rkt") +(module test racket/base + (displayln "run as program for tests")) + (test do (promise-tests) do (forcer-tests) do (lang-tests) diff --git a/pkgs/macro-debugger-pkgs/macro-debugger/tests/macro-debugger/all-tests.rkt b/pkgs/macro-debugger-pkgs/macro-debugger/tests/macro-debugger/all-tests.rkt index e5347a7479..c14ae2da6a 100644 --- a/pkgs/macro-debugger-pkgs/macro-debugger/tests/macro-debugger/all-tests.rkt +++ b/pkgs/macro-debugger-pkgs/macro-debugger/tests/macro-debugger/all-tests.rkt @@ -67,3 +67,9 @@ (let ([test/gui (dynamic-require 'rackunit/gui 'test/gui)]) (with-namespace (apply test/gui #:wait? #t tests))))))) + +;; Test mode: +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments (vector "--text")]) + (dynamic-require (quote-module-path "..") #f))) diff --git a/pkgs/main-distribution-test/info.rkt b/pkgs/main-distribution-test/info.rkt index 1468edfa2b..de652cfde6 100644 --- a/pkgs/main-distribution-test/info.rkt +++ b/pkgs/main-distribution-test/info.rkt @@ -3,6 +3,7 @@ (define collection 'multi) (define deps '("racket-test" + "rackunit-test" "gui-test" "db-test" "htdp-test" diff --git a/pkgs/mzscheme-pkgs/mzscheme-lib/mzscheme/examples/info.rkt b/pkgs/mzscheme-pkgs/mzscheme-lib/mzscheme/examples/info.rkt new file mode 100644 index 0000000000..a5b71b1dd7 --- /dev/null +++ b/pkgs/mzscheme-pkgs/mzscheme-lib/mzscheme/examples/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-omit-paths 'all) diff --git a/pkgs/net-pkgs/net-test/tests/net/main.rkt b/pkgs/net-pkgs/net-test/tests/net/main.rkt index 34837f871d..ec19dfc969 100644 --- a/pkgs/net-pkgs/net-test/tests/net/main.rkt +++ b/pkgs/net-pkgs/net-test/tests/net/main.rkt @@ -1,5 +1,8 @@ #lang racket/base +(module test racket/base + (displayln "run as program for tests")) + (require tests/eli-tester (prefix-in ip: "ip.rkt") (prefix-in dns: "dns.rkt") diff --git a/pkgs/net-pkgs/net-test/tests/net/websocket/example.rkt b/pkgs/net-pkgs/net-test/tests/net/websocket/example.rkt index 9677ddb7b5..48f20a9b48 100644 --- a/pkgs/net-pkgs/net-test/tests/net/websocket/example.rkt +++ b/pkgs/net-pkgs/net-test/tests/net/websocket/example.rkt @@ -5,6 +5,8 @@ web-server/templates web-server/servlet-env) +(module test racket/base) + (framing-mode 'old) (define stop-ws! diff --git a/pkgs/plai/tests/gc/info.rkt b/pkgs/plai/tests/gc/info.rkt index b541575df7..5dfba24454 100644 --- a/pkgs/plai/tests/gc/info.rkt +++ b/pkgs/plai/tests/gc/info.rkt @@ -3,3 +3,5 @@ (define compile-omit-paths '("bad-mutators" "bad-collectors" "other-mutators")) +(define test-omit-paths '("bad-mutators" + "other-mutators")) diff --git a/pkgs/plai/tests/gc/run-test.rkt b/pkgs/plai/tests/gc/run-test.rkt index bc1611f221..dffa6c55fa 100644 --- a/pkgs/plai/tests/gc/run-test.rkt +++ b/pkgs/plai/tests/gc/run-test.rkt @@ -3,6 +3,11 @@ racket/runtime-path "../util.rkt") +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments (vector "-g")]) + (dynamic-require (quote-module-path "..") #f))) + (define-runtime-path here ".") (define (in-directory pth rx) diff --git a/pkgs/plai/tests/gc2/info.rkt b/pkgs/plai/tests/gc2/info.rkt index b541575df7..5dfba24454 100644 --- a/pkgs/plai/tests/gc2/info.rkt +++ b/pkgs/plai/tests/gc2/info.rkt @@ -3,3 +3,5 @@ (define compile-omit-paths '("bad-mutators" "bad-collectors" "other-mutators")) +(define test-omit-paths '("bad-mutators" + "other-mutators")) diff --git a/pkgs/plai/tests/gc2/run-test.rkt b/pkgs/plai/tests/gc2/run-test.rkt index d6be378698..7ec95b631d 100644 --- a/pkgs/plai/tests/gc2/run-test.rkt +++ b/pkgs/plai/tests/gc2/run-test.rkt @@ -3,6 +3,11 @@ racket/runtime-path "../util.rkt") +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments (vector "-g")]) + (dynamic-require (quote-module-path "..") #f))) + (define-runtime-path here ".") (define (in-directory pth rx) diff --git a/pkgs/plai/tests/info.rkt b/pkgs/plai/tests/info.rkt new file mode 100644 index 0000000000..3232aa3431 --- /dev/null +++ b/pkgs/plai/tests/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-omit-paths '("web.rkt")) diff --git a/pkgs/planet-pkgs/planet-test/tests/planet/cmdline-tool.rkt b/pkgs/planet-pkgs/planet-test/tests/planet/cmdline-tool.rkt index daf72d356b..a84391c589 100644 --- a/pkgs/planet-pkgs/planet-test/tests/planet/cmdline-tool.rkt +++ b/pkgs/planet-pkgs/planet-test/tests/planet/cmdline-tool.rkt @@ -324,3 +324,6 @@ using 'system' to call out to the tool and then reading its results, etc. (delete-file (list-ref test-connection-spec 1)) (printf "Finished tests\n") + +(module test racket/base + (displayln "run as program for tests")) diff --git a/pkgs/planet-pkgs/planet-test/tests/planet/info.rkt b/pkgs/planet-pkgs/planet-test/tests/planet/info.rkt index b4cbbca8ed..de2d5ebd4f 100644 --- a/pkgs/planet-pkgs/planet-test/tests/planet/info.rkt +++ b/pkgs/planet-pkgs/planet-test/tests/planet/info.rkt @@ -1,3 +1,4 @@ #lang info (define compile-omit-paths '("examples")) +(define test-omit-paths '("examples")) diff --git a/pkgs/planet-pkgs/planet-test/tests/planet/submod.rkt b/pkgs/planet-pkgs/planet-test/tests/planet/submod.rkt index 0a59b932d5..e1a9be5b9f 100644 --- a/pkgs/planet-pkgs/planet-test/tests/planet/submod.rkt +++ b/pkgs/planet-pkgs/planet-test/tests/planet/submod.rkt @@ -1,6 +1,8 @@ #lang racket (require setup/dirs) +(module test racket/base) + (define raco (build-path (find-console-bin-dir) (if (eq? 'windows (system-type)) "raco.exe" diff --git a/pkgs/planet-pkgs/planet-test/tests/planet/thread-safe-resolver.rkt b/pkgs/planet-pkgs/planet-test/tests/planet/thread-safe-resolver.rkt index 31277489ba..1392e5e901 100644 --- a/pkgs/planet-pkgs/planet-test/tests/planet/thread-safe-resolver.rkt +++ b/pkgs/planet-pkgs/planet-test/tests/planet/thread-safe-resolver.rkt @@ -106,3 +106,6 @@ (check-equal? (get-docs-build-count) 6)) +(module+ test + (module config info + (define timeout 1000))) diff --git a/pkgs/plot-pkgs/plot-test/plot/tests/extreme-bounds-tests.rkt b/pkgs/plot-pkgs/plot-test/plot/tests/extreme-bounds-tests.rkt index 055e34b6ec..0d8bfe2e5d 100644 --- a/pkgs/plot-pkgs/plot-test/plot/tests/extreme-bounds-tests.rkt +++ b/pkgs/plot-pkgs/plot-test/plot/tests/extreme-bounds-tests.rkt @@ -2,6 +2,10 @@ (require plot plot/utils unstable/flonum) +(module+ test + (module config info + (define timeout 150))) + (plot (points '(#(0 0))) #:x-min +min.0 #:x-max (flstep +min.0 1000) #:y-min 0 #:y-max 1) diff --git a/pkgs/plot-pkgs/plot-test/plot/tests/slideshow-test.rkt b/pkgs/plot-pkgs/plot-test/plot/tests/slideshow-test.rkt index 8d2ff3952a..e18acc2f5c 100644 --- a/pkgs/plot-pkgs/plot-test/plot/tests/slideshow-test.rkt +++ b/pkgs/plot-pkgs/plot-test/plot/tests/slideshow-test.rkt @@ -2,6 +2,8 @@ (require plot plot/utils) +(module test racket/base) + (plot-font-size (current-font-size)) (plot-title "Untitled") (plot-width 600) diff --git a/pkgs/plt-services/meta/info.rkt b/pkgs/plt-services/meta/info.rkt index 66b595d5f6..09d369fd19 100644 --- a/pkgs/plt-services/meta/info.rkt +++ b/pkgs/plt-services/meta/info.rkt @@ -2,3 +2,14 @@ (define name "Infrastructure code") (define compile-omit-paths '("images/taking-screenshots/racket-widget.scm")) +(define test-omit-paths + '("build" + "check-dists.rkt" + "drdr" + "drdr2" + "images/mkheart.rkt" + "pkg-index/official" + "pkg-index/planet-compat" + "pkg-push" + "web")) + diff --git a/pkgs/plt-services/meta/props b/pkgs/plt-services/meta/props index c67b693e9b..bcf4768fec 100755 --- a/pkgs/plt-services/meta/props +++ b/pkgs/plt-services/meta/props @@ -640,8 +640,6 @@ path/s is either such a string or a list of them. "pkgs/algol60" responsible (mflatt robby) "pkgs/base" responsible (mflatt) "pkgs/cext-lib" responsible (mflatt) -"pkgs/cext-lib/compiler/commands/ctool.rkt" drdr:command-line (mzc *) -"pkgs/cext-lib/dynext/private/stdio.rkt" drdr:command-line #f "pkgs/compatibility-pkgs" responsible (eli mflatt robby samth) "pkgs/compatibility-pkgs/compatibility-doc/mzlib" responsible (mflatt) "pkgs/compatibility-pkgs/compatibility-lib/mzlib/contract.rkt" responsible (robby) @@ -650,7 +648,6 @@ path/s is either such a string or a list of them. "pkgs/compatibility-pkgs/compatibility-lib/mzlib/match.rkt" responsible (samth) "pkgs/compatibility-pkgs/compatibility-lib/mzlib/plt-match.rkt" responsible (samth) "pkgs/compatibility-pkgs/compatibility-lib/mzlib/shared.rkt" responsible (robby) -"pkgs/compatibility-pkgs/compatibility-lib/mzlib/traceld.rkt" drdr:command-line #f "pkgs/compatibility-pkgs/compatibility-test/tests/mzlib/awk.rktl" drdr:command-line #f "pkgs/compatibility-pkgs/compatibility-test/tests/mzlib/binc.rktl" drdr:command-line #f "pkgs/compatibility-pkgs/compatibility-test/tests/mzlib/cmdline.rktl" drdr:command-line #f @@ -675,106 +672,48 @@ path/s is either such a string or a list of them. "pkgs/compatibility-pkgs/compatibility-test/tests/mzlib/unit.rktl" drdr:command-line #f "pkgs/compatibility-pkgs/compatibility-test/tests/mzlib/unitsig.rktl" drdr:command-line #f "pkgs/compiler-pkgs" responsible (mflatt jay) -"pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe-dir.rkt" drdr:command-line #f -"pkgs/compiler-pkgs/compiler-lib/compiler/commands/exe.rkt" drdr:command-line #f -"pkgs/compiler-pkgs/compiler-lib/compiler/commands/make.rkt" drdr:command-line (mzc *) -"pkgs/compiler-pkgs/compiler-lib/compiler/commands/pack.rkt" drdr:command-line #f "pkgs/compiler-pkgs/compiler-lib/compiler/commands/test.rkt" responsible (jay) "pkgs/compiler-pkgs/compiler-lib/compiler/demodularizer" responsible (jay) -"pkgs/compiler-pkgs/compiler-lib/compiler/demodularizer/batch.rkt" drdr:command-line #f "pkgs/compiler-pkgs/compiler-test/tests/compiler" responsible (jay) "pkgs/compiler-pkgs/compiler-test/tests/compiler/demodularizer/demod-test.rkt" drdr:timeout 600 "pkgs/compiler-pkgs/compiler-test/tests/compiler/embed" responsible (mflatt) "pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-me4.rktl" drdr:command-line #f -"pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-me9.rkt" drdr:command-line #f -"pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-planet-1/alt.rkt" drdr:command-line #f -"pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-planet-1/dyn-sub.rkt" drdr:command-line #f -"pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-planet-1/main.rkt" drdr:command-line #f -"pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-planet-1/other.rkt" drdr:command-line #f -"pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/embed-planet-2" drdr:command-line #f "pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/test.rkt" drdr:timeout 800 "pkgs/compiler-pkgs/compiler-test/tests/compiler/regression.rkt" responsible (mflatt) -"pkgs/compiler-pkgs/compiler-test/tests/compiler/test" drdr:command-line (raco "test" "-r" "--" *) -"pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test-worker.rkt" drdr:command-line #f -"pkgs/compiler-pkgs/compiler-test/tests/compiler/zo-test.rkt" drdr:command-line (racket * "-I" "-S" "-t" "60" "-v" "-R") "pkgs/contract-profile" responsible (stamourv) "pkgs/data-pkgs" responsible (ryanc samth) "pkgs/datalog" responsible (jay) "pkgs/db-pkgs" responsible (ryanc) -"pkgs/db-pkgs/db-lib/db/odbc.rkt" drdr:command-line #f -"pkgs/db-pkgs/db-lib/db/private/odbc/connection.rkt" drdr:command-line #f -"pkgs/db-pkgs/db-lib/db/private/odbc/dbsystem.rkt" drdr:command-line #f -"pkgs/db-pkgs/db-lib/db/private/odbc/ffi.rkt" drdr:command-line #f -"pkgs/db-pkgs/db-lib/db/private/odbc/main.rkt" drdr:command-line #f -"pkgs/db-pkgs/db-test/tests/db/programs/web-test.rkt" drdr:command-line #f "pkgs/deinprogramm" responsible (sperber) "pkgs/deinprogramm/deinprogramm/convert-explicit.scm" drdr:command-line #f "pkgs/deinprogramm/deinprogramm/define-record-procedures.scm" drdr:command-line #f "pkgs/deinprogramm/deinprogramm/line3d.scm" drdr:command-line #f "pkgs/deinprogramm/deinprogramm/quickcheck/quickcheck.scm" drdr:command-line #f "pkgs/deinprogramm/deinprogramm/quickcheck/random.scm" drdr:command-line #f -"pkgs/deinprogramm/deinprogramm/run-dmda-code.rkt" drdr:command-line (mzc *) "pkgs/distributed-places-pkgs" responsible (tewk) -"pkgs/distributed-places-pkgs/distributed-places-lib/racket/place/distributed/examples/hello-world.rkt" drdr:command-line #f "pkgs/distro-build" responsible (mflatt) -"pkgs/distro-build/add-catalog.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/assemble-site.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/drive-clients.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/install-for-docs.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/install-pkgs.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/installer.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/manage-snapshots.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/pack-and-catalog.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/pack-collects.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/serve-catalog.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/set-config.rkt" drdr:command-line (mzc *) -"pkgs/distro-build/unpack-collects.rkt" drdr:command-line (mzc *) "pkgs/draw-pkgs" responsible (mflatt) "pkgs/drracket-pkgs" responsible (robby) -"pkgs/drracket-pkgs/drracket/drracket/drracket.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket/drracket/main.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket/drracket/private/dock-icon.rkt" drdr:command-line (raco "make" *) -"pkgs/drracket-pkgs/drracket/drracket/private/drracket-normal.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket/drracket/private/launcher-mred-bootstrap.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket/drracket/private/launcher-mz-bootstrap.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket/drracket/private/stick-figures.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket/drracket/tool-lib.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket/drscheme/drscheme.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket/drscheme/main.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket/drscheme/tool-lib.rkt" drdr:command-line (mzc *) "pkgs/drracket-pkgs/drracket/gui-debugger" responsible (gmarceau mflatt) "pkgs/drracket-pkgs/drracket/lang" responsible (mflatt robby matthias) "pkgs/drracket-pkgs/drracket/repo-time-stamp" responsible (eli) -"pkgs/drracket-pkgs/drracket/scribble/tools/drracket-buttons.rkt" drdr:command-line #f -"pkgs/drracket-pkgs/drracket/scribble/tools/private/mk-drs-bitmaps.rkt" drdr:command-line (racket * "skip") -"pkgs/drracket-pkgs/drracket/scribblings/drracket/incremental-keybindings.rkt" drdr:command-line #f "pkgs/drracket-pkgs/drracket-test/tests/drracket" drdr:random #t "pkgs/drracket-pkgs/drracket-test/tests/drracket/easter-egg.rkt" drdr:timeout 480 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/example-tool.rkt" drdr:command-line (gracket *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/follow-log.rkt" drdr:command-line (raco "make" *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/hangman.rkt" responsible (robby matthias) drdr:command-line (gracket *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/io.rkt" drdr:command-line (gracket *) drdr:timeout 500 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/language-test.rkt" responsible (robby matthias) drdr:command-line (gracket *) drdr:timeout 1500 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/memory-log.rkt" drdr:command-line (gracket *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/module-lang-test.rkt" drdr:command-line (gracket "-j" "-e" "(void (putenv \"PLTDRDRTEST\" \"yes\"))" "-t" *) drdr:timeout 800 +"pkgs/drracket-pkgs/drracket-test/tests/drracket/hangman.rkt" responsible (robby matthias) +"pkgs/drracket-pkgs/drracket-test/tests/drracket/io.rkt" drdr:timeout 500 +"pkgs/drracket-pkgs/drracket-test/tests/drracket/language-test.rkt" responsible (robby matthias) drdr:timeout 1500 +"pkgs/drracket-pkgs/drracket-test/tests/drracket/module-lang-test.rkt" drdr:timeout 800 "pkgs/drracket-pkgs/drracket-test/tests/drracket/no-write-and-frame-leak.rkt" drdr:timeout 500 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/populate-compiled.rkt" drdr:command-line (gracket *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-language-dialog.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/randomly-click-preferences.rkt" drdr:command-line (mzc *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debug.rkt" drdr:command-line (gracket *) drdr:timeout 300 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debugprofile.rkt" drdr:command-line (gracket *) drdr:timeout 300 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-misc.rkt" drdr:command-line (gracket *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-raw.rkt" drdr:command-line (gracket *) drdr:timeout 300 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/collapsed.rkt" drdr:command-line (racket "-l" "racket/gui/base" "-t" *) +"pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debug.rkt" drdr:timeout 300 +"pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-debugprofile.rkt" drdr:timeout 300 +"pkgs/drracket-pkgs/drracket-test/tests/drracket/repl-test-raw.rkt" drdr:timeout 300 "pkgs/drracket-pkgs/drracket-test/tests/drracket/snip/run-all.rkt" drdr:timeout 800 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/snips.rkt" drdr:command-line (gracket *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/syncheck-test.rkt" drdr:command-line (gracket *) drdr:timeout 200 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/teaching-lang-coverage.rkt" responsible (robby matthias) drdr:command-line (gracket *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/teaching-lang-save-file.rkt" responsible (robby matthias) drdr:command-line (gracket *) +"pkgs/drracket-pkgs/drracket-test/tests/drracket/syncheck-test.rkt" drdr:timeout 200 +"pkgs/drracket-pkgs/drracket-test/tests/drracket/teaching-lang-coverage.rkt" responsible (robby matthias) +"pkgs/drracket-pkgs/drracket-test/tests/drracket/teaching-lang-save-file.rkt" responsible (robby matthias) "pkgs/drracket-pkgs/drracket-test/tests/drracket/teaching-lang-sharing-modules.rkt" drdr:timeout 800 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/teachpack.rkt" responsible (robby matthias) drdr:command-line (gracket *) -"pkgs/drracket-pkgs/drracket-test/tests/drracket/test-engine-test.rkt" responsible (sperber) drdr:command-line (gracket *) drdr:timeout 480 -"pkgs/drracket-pkgs/drracket-test/tests/drracket/tool-lib-and-sig.rkt" drdr:command-line (raco "make" *) +"pkgs/drracket-pkgs/drracket-test/tests/drracket/teachpack.rkt" responsible (robby matthias) +"pkgs/drracket-pkgs/drracket-test/tests/drracket/test-engine-test.rkt" responsible (sperber) drdr:timeout 480 "pkgs/drracket-pkgs/drracket-test/tests/jpr" responsible (mflatt) "pkgs/drracket-pkgs/drracket-test/tests/jpr/balle-grav-frot.ss" drdr:command-line (mzc "-k" *) "pkgs/drracket-pkgs/drracket-test/tests/jpr/dessine-arbre.ss" drdr:command-line (mzc "-k" *) @@ -789,106 +728,27 @@ path/s is either such a string or a list of them. "pkgs/eopl" responsible (dvanhorn) "pkgs/errortrace-pkgs" responsible (mflatt) "pkgs/errortrace-pkgs/errortrace-test/tests/errortrace/alert.rkt" responsible (eli) -"pkgs/errortrace-pkgs/errortrace-test/tests/errortrace/main.rkt" drdr:command-line #f "pkgs/frtime" responsible (jay gcooper) -"pkgs/frtime/animation.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/analog-clock.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/ball-on-string.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/delay-mouse.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/growing-points.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/mirror-lens.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/mouse.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/needles.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/orbit-mouse.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/piston.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/pong.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/push-pull-ball.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/rotation.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/tetris.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/tile-game.rkt" drdr:command-line (mzc *) -"pkgs/frtime/demos/ufo.rkt" drdr:command-line (mzc *) -"pkgs/frtime/gui/demo" drdr:command-line (mzc *) -"pkgs/frtime/gui.rkt" drdr:command-line (mzc *) "pkgs/frtime/tests/time.rkt" drdr:random #t "pkgs/future-visualizer-pkgs" responsible (jamesswaine) "pkgs/games" responsible (mflatt robby) "pkgs/games/chat-noir" responsible (robby matthias) -"pkgs/games/gobblet/check.rkt" drdr:command-line (mzc "-k" *) -"pkgs/games/gobblet/robot.rkt" drdr:command-line (mzc "-k" *) -"pkgs/games/gobblet/test-explore.rkt" drdr:command-line (mzc "-k" *) -"pkgs/games/gobblet/test-model.rkt" drdr:command-line (mzc "-k" *) -"pkgs/games/main.rkt" drdr:command-line (mzc *) -"pkgs/games/paint-by-numbers/main.rkt" drdr:command-line #f -"pkgs/games/paint-by-numbers/raw-problems/build-final.rkt" drdr:command-line (mzc *) -"pkgs/games/paint-by-numbers/raw-problems/build-rows-cols.rkt" drdr:command-line (mzc "-k" *) -"pkgs/games/paint-by-numbers/raw-problems/build-solution-sets.rkt" drdr:command-line (gracket *) -"pkgs/games/paint-by-numbers/raw-problems/size-calculation.rkt" drdr:command-line (mzc *) -"pkgs/games/parcheesi/make-bitmap.rkt" drdr:command-line (mzc *) "pkgs/gui-pkg-manager-pkgs" responsible (mflatt) -"pkgs/gui-pkg-manager-pkgs/gui-pkg-manager-lib/pkg/gui/main.rkt" drdr:command-line (mzc *) "pkgs/gui-pkgs" responsible (mflatt) "pkgs/gui-pkgs/gui-doc/mrlib" responsible (robby) "pkgs/gui-pkgs/gui-doc/scribblings/framework" responsible (robby) -"pkgs/gui-pkgs/gui-lib/embedded-gui/private/tests" drdr:command-line #f "pkgs/gui-pkgs/gui-lib/framework" responsible (robby) -"pkgs/gui-pkgs/gui-lib/framework/private/encode.rkt" drdr:command-line (racket *) -"pkgs/gui-pkgs/gui-lib/mred/edit-main.rkt" drdr:command-line (mzc *) -"pkgs/gui-pkgs/gui-lib/mred/private/wx/cocoa" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mred/private/wx/win32" drdr:command-line #f "pkgs/gui-pkgs/gui-lib/mrlib" responsible (mflatt robby) -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/actual-bigger.rkt" drdr:command-line (gracket *) -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/example-min.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/example.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/minimal.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/more-tests-margin-aligned.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/more-tests-margin.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/more-tests-min-stretchable.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/more-tests-min.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/more-tests-text.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/more-tests.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/old-bugs" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/stretchable-editor-snip-test-min.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/stretchable-editor-snip-test.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/test-locked-pasteboard.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/test-snip-lib.rkt" drdr:command-line (gracket *) -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/test.rkt" drdr:command-line (gracket *) -"pkgs/gui-pkgs/gui-lib/mrlib/private/aligned-pasteboard/tests/test2.rkt" drdr:command-line (gracket *) "pkgs/gui-pkgs/gui-test/framework" responsible (robby) -"pkgs/gui-pkgs/gui-test/framework/tests/canvas.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/debug.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/exit.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/frame.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/framework-test-engine.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/group-test.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/handler-test.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/keys.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/load.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/main.rkt" drdr:command-line (gracket *) drdr:timeout 360 -"pkgs/gui-pkgs/gui-test/framework/tests/mem.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/panel-single.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/panel.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/pasteboard.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/prefs.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/search.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/test-suite-utils.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/framework/tests/text.rkt" drdr:command-line (mzc "-k" *) -"pkgs/gui-pkgs/gui-test/tests/gracket/blits.rkt" drdr:command-line #f +"pkgs/gui-pkgs/gui-test/framework/tests/main.rkt" drdr:timeout 360 "pkgs/gui-pkgs/gui-test/tests/gracket/cache-image-snip-test.rktl" drdr:command-line #f "pkgs/gui-pkgs/gui-test/tests/gracket/dc.rktl" drdr:command-line #f "pkgs/gui-pkgs/gui-test/tests/gracket/draw-mem.rkt" drdr:random #t -"pkgs/gui-pkgs/gui-test/tests/gracket/draw.rkt" drdr:command-line (mzc *) "pkgs/gui-pkgs/gui-test/tests/gracket/editor.rktl" drdr:command-line #f -"pkgs/gui-pkgs/gui-test/tests/gracket/flush-stress.rkt" drdr:command-line #f -"pkgs/gui-pkgs/gui-test/tests/gracket/item.rkt" drdr:command-line (mzc *) "pkgs/gui-pkgs/gui-test/tests/gracket/loadtest.rktl" drdr:command-line #f -"pkgs/gui-pkgs/gui-test/tests/gracket/mem.rkt" drdr:command-line #f "pkgs/gui-pkgs/gui-test/tests/gracket/paramz.rktl" drdr:command-line #f -"pkgs/gui-pkgs/gui-test/tests/gracket/showkey.rkt" drdr:command-line #f "pkgs/gui-pkgs/gui-test/tests/gracket/testing.rktl" drdr:command-line #f -"pkgs/gui-pkgs/gui-test/tests/gracket/unflushed-circle.rkt" drdr:command-line #f "pkgs/gui-pkgs/gui-test/tests/gracket/windowing.rktl" drdr:command-line #f -"pkgs/gui-pkgs/gui-test/tests/gracket/wxme-doc-random.rkt" drdr:command-line (mzc *) -"pkgs/gui-pkgs/gui-test/tests/gracket/wxme-random.rkt" drdr:command-line #f "pkgs/honu" responsible (mflatt rafkind) "pkgs/htdp-pkgs" responsible (matthias mflatt robby) "pkgs/htdp-pkgs/htdp-doc/teachpack/2htdp/scribblings/image-util.rkt" responsible (robby) @@ -898,52 +758,18 @@ path/s is either such a string or a list of them. "pkgs/htdp-pkgs/htdp-lib/2htdp/private/image-core.rkt" responsible (robby) "pkgs/htdp-pkgs/htdp-lib/2htdp/private/image-more.rkt" responsible (robby) "pkgs/htdp-pkgs/htdp-lib/2htdp/private/img-err.rkt" responsible (robby) -"pkgs/htdp-pkgs/htdp-lib/2htdp/uchat/chatter.rkt" drdr:command-line (mzc "-k" *) -"pkgs/htdp-pkgs/htdp-lib/2htdp/uchat/server.rkt" drdr:command-line (mzc "-k" *) "pkgs/htdp-pkgs/htdp-lib/graphics" responsible (mflatt robby) "pkgs/htdp-pkgs/htdp-lib/graphics/tests/sixlib.rktl" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-lib/graphics/turtle-test.rkt" drdr:command-line (mzc "-k" *) -"pkgs/htdp-pkgs/htdp-lib/graphics/value-turtles-test.rkt" drdr:command-line (mzc *) -"pkgs/htdp-pkgs/htdp-lib/htdp/graphing.rkt" drdr:command-line (mzc *) "pkgs/htdp-pkgs/htdp-lib/stepper" responsible (clements) "pkgs/htdp-pkgs/htdp-lib/teachpack" responsible (matthias) "pkgs/htdp-pkgs/htdp-lib/teachpack/balls.ss" drdr:command-line (mzc *) -"pkgs/htdp-pkgs/htdp-lib/teachpack/htdp/graphing.rkt" drdr:command-line (mzc *) "pkgs/htdp-pkgs/htdp-lib/test-engine" responsible (kathyg) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/batch-io-xexpr.rkt" drdr:command-line (raco "make" *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/full-scene-visible.rkt" drdr:command-line (gracket *) "pkgs/htdp-pkgs/htdp-test/2htdp/tests/image-equality-performance-htdp.rkt" responsible (robby) "pkgs/htdp-pkgs/htdp-test/2htdp/tests/image-equality-performance.rkt" responsible (robby) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/jpr-bug.rkt" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/mouse-evt.rkt" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/mp.rkt" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/on-release-no-key.rkt" drdr:command-line (raco "make" *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/on-tick-universe-with-limit.rkt" drdr:command-line (gracket *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/pad1.rkt" drdr:command-line (raco "make" *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/perform-record.rkt" drdr:command-line (gracket *) drdr:timeout 300 -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/perform-robby.rkt" drdr:command-line (gracket *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/perform-whack.rkt" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/profile-robby.rkt" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/record-stop-when.rkt" drdr:command-line (gracket *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/record.rkt" drdr:command-line (gracket *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/release.rkt" drdr:command-line (gracket *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/struct-universe.rkt" drdr:command-line (gracket *) drdr:random #t +"pkgs/htdp-pkgs/htdp-test/2htdp/tests/perform-record.rkt" drdr:timeout 300 +"pkgs/htdp-pkgs/htdp-test/2htdp/tests/struct-universe.rkt" drdr:random #t "pkgs/htdp-pkgs/htdp-test/2htdp/tests/test-image.rkt" responsible (robby) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/ufo-rename.rkt" drdr:command-line (gracket *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/universe-receive.rkt" drdr:command-line (raco "make" *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/universe-restart.rkt" drdr:command-line (gracket *) -"pkgs/htdp-pkgs/htdp-test/2htdp/tests/world0-stops.rkt" drdr:command-line (gracket *) -"pkgs/htdp-pkgs/htdp-test/2htdp/utest/balls.rkt" drdr:command-line (mzc *) -"pkgs/htdp-pkgs/htdp-test/2htdp/utest/sam.rkt" drdr:command-line (mzc *) -"pkgs/htdp-pkgs/htdp-test/htdp/tests/convert.rkt" drdr:command-line (mzc *) -"pkgs/htdp-pkgs/htdp-test/htdp/tests/dir.rkt" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/htdp/tests/elevator.rkt" drdr:command-line (mzc *) -"pkgs/htdp-pkgs/htdp-test/htdp/tests/graphing.rkt" drdr:command-line (mzc *) -"pkgs/htdp-pkgs/htdp-test/htdp/tests/gui.rkt" responsible (robby) drdr:command-line (mzc *) -"pkgs/htdp-pkgs/htdp-test/htdp/tests/hangman-error.rkt" drdr:command-line (mzc *) -"pkgs/htdp-pkgs/htdp-test/htdp/tests/matrix-client.rkt" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/htdp/tests/matrix-example.rkt" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/htdp/tests/world-mouse.rkt" drdr:command-line (mzc *) +"pkgs/htdp-pkgs/htdp-test/htdp/tests/gui.rkt" responsible (robby) "pkgs/htdp-pkgs/htdp-test/tests/htdp-lang" responsible (robby mflatt matthias) "pkgs/htdp-pkgs/htdp-test/tests/htdp-lang/advanced.rktl" drdr:command-line #f "pkgs/htdp-pkgs/htdp-test/tests/htdp-lang/beg-adv.rktl" drdr:command-line #f @@ -965,12 +791,10 @@ path/s is either such a string or a list of them. "pkgs/htdp-pkgs/htdp-test/tests/stepper/already-defined.rktl" drdr:command-line #f "pkgs/htdp-pkgs/htdp-test/tests/stepper/automatic-tests.rkt" drdr:timeout 600 "pkgs/htdp-pkgs/htdp-test/tests/stepper/bad-letrec-test.rktl" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/tests/stepper/big-bang-test.rkt" drdr:command-line (mzc *) "pkgs/htdp-pkgs/htdp-test/tests/stepper/constructor-redexes.rktl" drdr:command-line #f "pkgs/htdp-pkgs/htdp-test/tests/stepper/global-prim-reduction.rktl" drdr:command-line #f "pkgs/htdp-pkgs/htdp-test/tests/stepper/image-test.rktl" drdr:command-line #f "pkgs/htdp-pkgs/htdp-test/tests/stepper/intermediate-y.rktl" drdr:command-line #f -"pkgs/htdp-pkgs/htdp-test/tests/stepper/jump-to-ui-test.rkt" drdr:command-line #f "pkgs/htdp-pkgs/htdp-test/tests/stepper/lambda-test.rktl" drdr:command-line #f "pkgs/htdp-pkgs/htdp-test/tests/stepper/let-test.rktl" drdr:command-line #f "pkgs/htdp-pkgs/htdp-test/tests/stepper/letrec-test.rktl" drdr:command-line #f @@ -1000,11 +824,8 @@ path/s is either such a string or a list of them. "pkgs/html-pkgs" responsible (jay mflatt) "pkgs/icons" responsible (ntoronto) "pkgs/images-pkgs" responsible (ntoronto) -"pkgs/images-pkgs/images-test/images/tests/effects-tests.rkt" drdr:command-line #f "pkgs/lazy" responsible (eli stchang) -"pkgs/lazy/tests/main.rkt" drdr:command-line #f "pkgs/macro-debugger-pkgs" responsible (ryanc) -"pkgs/macro-debugger-pkgs/macro-debugger/tests/macro-debugger/all-tests.rkt" drdr:command-line (racket * "--text") "pkgs/main-distribution" responsible (eli jay matthias mflatt robby) "pkgs/main-distribution-test" responsible (eli jay matthias mflatt robby) "pkgs/make" responsible (mflatt) @@ -1012,77 +833,41 @@ path/s is either such a string or a list of them. "pkgs/math-pkgs/math-test/math/tests/bigfloat-custodian.rkt" drdr:random #t "pkgs/math-pkgs/math-test/math/tests/matrix-tests.rkt" drdr:timeout 120 "pkgs/mysterx" responsible (mflatt) -"pkgs/mysterx/main.rkt" drdr:command-line (mzc *) -"pkgs/mysterx/mysterx.rkt" drdr:command-line (mzc *) "pkgs/mzcom" responsible (mflatt) "pkgs/mzcom/tests/test.rktl" drdr:command-line #f "pkgs/mzscheme-pkgs" responsible (mflatt) -"pkgs/mzscheme-pkgs/mzscheme-lib/mzscheme/examples/cfile.rkt" drdr:command-line #f -"pkgs/mzscheme-pkgs/mzscheme-lib/mzscheme/examples/curses-demo.rkt" drdr:command-line #f -"pkgs/mzscheme-pkgs/mzscheme-lib/mzscheme/examples/fmod-ez.rkt" drdr:command-line #f -"pkgs/mzscheme-pkgs/mzscheme-lib/mzscheme/examples/msgbox.rkt" drdr:command-line #f -"pkgs/mzscheme-pkgs/mzscheme-lib/mzscheme/examples/tree-finish.rkt" drdr:command-line #f "pkgs/net-pkgs" responsible (eli jay mflatt robby) -"pkgs/net-pkgs/net-test/tests/net/main.rkt" drdr:command-line #f "pkgs/net-pkgs/net-test/tests/net/stress" responsible (jay) "pkgs/net-pkgs/net-test/tests/net/stress/websocket.rkt" drdr:random #t "pkgs/net-pkgs/net-test/tests/net/url-port.rkt" responsible (jay) drdr:timeout 300 "pkgs/net-pkgs/net-test/tests/net/websocket" responsible (jay) -"pkgs/net-pkgs/net-test/tests/net/websocket/example.rkt" drdr:command-line #f "pkgs/net-pkgs/net-test/tests/net/websocket.rkt" responsible (jay) "pkgs/parser-tools-pkgs" responsible (mflatt) -"pkgs/parser-tools-pkgs/parser-tools-lib/parser-tools/private-lex/error-tests.rkt" drdr:command-line #f "pkgs/pconvert-lib" responsible (robby) "pkgs/pict-pkgs" responsible (mflatt robby) "pkgs/picturing-programs" responsible (sbloch) "pkgs/plai" responsible (jay) -"pkgs/plai/tests/gc/bad-mutators" drdr:command-line #f -"pkgs/plai/tests/gc/other-mutators" drdr:command-line #f -"pkgs/plai/tests/gc/run-test.rkt" drdr:command-line (racket * "-g") -"pkgs/plai/tests/gc2/bad-mutators" drdr:command-line #f -"pkgs/plai/tests/gc2/other-mutators" drdr:command-line #f -"pkgs/plai/tests/gc2/run-test.rkt" drdr:command-line (racket * "-g") "pkgs/plai/tests/test-random-mutator.rkt" responsible (jay robby) -"pkgs/plai/tests/web.rkt" drdr:command-line (mzc "-k" *) "pkgs/planet-pkgs" responsible (robby mflatt) "pkgs/planet-pkgs/planet-test/tests/planet" responsible (robby jay) -"pkgs/planet-pkgs/planet-test/tests/planet/cmdline-tool.rkt" drdr:command-line (raco "make" *) -"pkgs/planet-pkgs/planet-test/tests/planet/docs-build.rkt" drdr:command-line (raco "make" *) -"pkgs/planet-pkgs/planet-test/tests/planet/examples/dummy-module.rkt" drdr:command-line #f -"pkgs/planet-pkgs/planet-test/tests/planet/examples/scribblings-package" drdr:command-line #f -"pkgs/planet-pkgs/planet-test/tests/planet/lang.rkt" drdr:command-line (raco "make" *) "pkgs/planet-pkgs/planet-test/tests/planet/run-all.rkt" drdr:timeout 500 drdr:random #t -"pkgs/planet-pkgs/planet-test/tests/planet/submod.rkt" drdr:command-line #f -"pkgs/planet-pkgs/planet-test/tests/planet/test-docs-complete.rkt" drdr:command-line (raco "make" *) -"pkgs/planet-pkgs/planet-test/tests/planet/thread-safe-resolver.rkt" drdr:command-line (raco "make" *) drdr:timeout 1000 -"pkgs/planet-pkgs/planet-test/tests/planet/version.rkt" drdr:command-line (raco "make" *) "pkgs/plot-pkgs" responsible (ntoronto) "pkgs/plot-pkgs/plot-doc/plot/scribblings/plot.scrbl" drdr:timeout 180 "pkgs/plot-pkgs/plot-test/plot/tests/extreme-bounds-tests.rkt" drdr:timeout 150 -"pkgs/plot-pkgs/plot-test/plot/tests/slideshow-test.rkt" drdr:command-line #f "pkgs/plt-services" responsible (eli mflatt) "pkgs/plt-services/meta" responsible (eli) -"pkgs/plt-services/meta/build" drdr:command-line #f -"pkgs/plt-services/meta/check-dists.rkt" drdr:command-line #f -"pkgs/plt-services/meta/drdr" responsible (jay) drdr:command-line #f -"pkgs/plt-services/meta/drdr2" responsible (jay) drdr:command-line #f -"pkgs/plt-services/meta/images/mkheart.rkt" drdr:command-line #f +"pkgs/plt-services/meta/drdr" responsible (jay) +"pkgs/plt-services/meta/drdr2" responsible (jay) "pkgs/plt-services/meta/images/taking-screenshots/racket-widget.scm" drdr:command-line #f "pkgs/plt-services/meta/pkg-index" responsible (jay) -"pkgs/plt-services/meta/pkg-index/official" drdr:command-line #f -"pkgs/plt-services/meta/pkg-index/planet-compat" drdr:command-line #f -"pkgs/plt-services/meta/pkg-push/push-catalog.rkt" drdr:command-line #f "pkgs/plt-services/meta/props" responsible (eli jay) drdr:command-line (racket "-um" * "verify") -"pkgs/plt-services/meta/web" drdr:command-line #f "pkgs/preprocessor" responsible (eli) "pkgs/profile-pkgs" responsible (eli samth stamourv) -"pkgs/profile-pkgs/profile-lib/analyzer.rkt" drdr:command-line (raco "test" *) "pkgs/r5rs-pkgs" responsible (mflatt) "pkgs/r6rs-pkgs" responsible (mflatt) -"pkgs/r6rs-pkgs/r6rs-lib/r6rs/run.rkt" drdr:command-line (mzc *) "pkgs/racket-pkgs" responsible (eli jay matthias mflatt robby ryanc samth) "pkgs/racket-pkgs/at-exp-lib" responsible (eli mflatt) -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/auto.rkt" drdr:command-line (racket * "--" "racket" "earley") drdr:random #t +"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/auto.rkt" drdr:random #t "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/mk-bigloo.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/mk-chicken.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/mk-gambit.rktl" drdr:command-line #f @@ -1114,172 +899,62 @@ path/s is either such a string or a list of them. "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/typed/takr2.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/typed/triangle.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/mz/ssax.rkt" drdr:timeout 900 -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/places" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/rx/auto.rkt" drdr:command-line (racket * "racket" "simple") drdr:timeout 600 drdr:random #t -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/ackermann.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/auto.rkt" drdr:command-line (racket * "hello") drdr:random #t -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/binarytrees-normal.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/binarytrees-places.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/binarytrees.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/chameneos.rkt" drdr:command-line (racket * "10") drdr:random #t -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/cheapconcurrency.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/fannkuch-redux.rkt" drdr:command-line (racket * "4") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/fannkuch.rkt" drdr:command-line (racket * "4") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/fasta-new.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/fasta.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/hash.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/hash2.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/mandelbrot-futures.rkt" drdr:command-line (racket * "15") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/mandelbrot-generic.rkt" drdr:command-line (racket * "15") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/mandelbrot.rkt" drdr:command-line (racket * "15") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/meteor.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/nbody-generic.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/nbody-vec-generic.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/nbody-vec.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/nbody.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/nestedloop.rkt" drdr:command-line (racket * "2") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/nsieve.rkt" drdr:command-line (racket * "2") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/nsievebits.rkt" drdr:command-line (racket * "2") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/partialsums.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/pidigits-gmp.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/pidigits.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/random.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/recursive.rkt" drdr:command-line (racket * "2") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/run.rkt" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/spectralnorm-generic.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/spectralnorm-par.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/spectralnorm.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/spellcheck.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/strcat.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/thread-ring.rkt" drdr:command-line (racket * "25") +"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/rx/auto.rkt" drdr:timeout 600 drdr:random #t +"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/auto.rkt" drdr:random #t +"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/chameneos.rkt" drdr:random #t "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed" responsible (stamourv samth) -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/ackermann-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/ackermann-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/ackermann.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/ary.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/binarytrees-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/binarytrees-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/binarytrees.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/chameneos-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/chameneos-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/chameneos.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/cheapconcurrency-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/cheapconcurrency-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/cheapconcurrency.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/echo.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/except.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fannkuch-non-optimizing.rkt" drdr:command-line (racket * "4") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fannkuch-optimizing.rkt" drdr:command-line (racket * "4") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fannkuch-redux-non-optimizing.rkt" drdr:command-line (racket * "4") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fannkuch-redux-optimizing.rkt" drdr:command-line (racket * "4") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fannkuch-redux.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fannkuch.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fasta-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fasta-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fasta.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/fibo.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/hash-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/hash-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/hash.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/hash2-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/hash2-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/hash2.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/heapsort.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/hello.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/k-nucleotide.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/lists.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/mandelbrot-generic-non-optimizing.rkt" drdr:command-line (racket * "15") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/mandelbrot-generic-optimizing.rkt" drdr:command-line (racket * "15") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/mandelbrot-generic.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/mandelbrot-non-optimizing.rkt" drdr:command-line (racket * "15") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/mandelbrot-optimizing.rkt" drdr:command-line (racket * "15") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/mandelbrot.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/matrix.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/meteor-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/meteor-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/meteor.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/moments.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-generic-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-generic-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-generic.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-vec-generic-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-vec-generic-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-vec-generic.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-vec-non-optimizing.rkt" drdr:command-line (racket * "10") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-vec-optimizing.rkt" drdr:command-line (racket * "10") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody-vec.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nbody.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nestedloop-non-optimizing.rkt" drdr:command-line (racket * "2") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nestedloop-optimizing.rkt" drdr:command-line (racket * "2") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nestedloop.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nothing.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nsieve-non-optimizing.rkt" drdr:command-line (racket * "2") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nsieve-optimizing.rkt" drdr:command-line (racket * "2") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nsieve.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nsievebits-non-optimizing.rkt" drdr:command-line (racket * "2") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nsievebits-optimizing.rkt" drdr:command-line (racket * "2") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/nsievebits.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/partialsums-non-optimizing.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/partialsums-optimizing.rkt" drdr:command-line (racket * "25") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/partialsums.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/pidigits-non-optimizing.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/pidigits-optimizing.rkt" drdr:command-line (racket * "25") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/pidigits.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/pidigits1.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/random-non-optimizing.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/random-optimizing.rkt" drdr:command-line (racket * "25") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/random.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/recursive-non-optimizing.rkt" drdr:command-line (racket * "2") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/recursive-optimizing.rkt" drdr:command-line (racket * "2") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/recursive.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/regexmatch.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/regexpdna.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/reversecomplement-non-optimizing.rkt" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/reversecomplement-optimizing.rkt" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/reversecomplement.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/reversefile.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/sieve.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/spectralnorm-generic-non-optimizing.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/spectralnorm-generic-optimizing.rkt" drdr:command-line (racket * "25") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/spectralnorm-generic.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/spectralnorm-non-optimizing.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/spectralnorm-optimizing.rkt" drdr:command-line (racket * "25") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/spectralnorm.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/spellcheck-non-optimizing.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/spellcheck-optimizing.rkt" drdr:command-line (mzc *) "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/spellcheck.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/strcat-non-optimizing.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/strcat-optimizing.rkt" drdr:command-line (racket * "25") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/strcat.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/sumcol.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/thread-ring-non-optimizing.rkt" drdr:command-line (racket * "25") -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/thread-ring-optimizing.rkt" drdr:command-line (racket * "25") "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/thread-ring.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/wc-non-optimizing.rkt" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/wc-optimizing.rkt" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/wc.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/wordfreq-non-optimizing.rkt" drdr:command-line #f -"pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/wordfreq-optimizing.rkt" drdr:command-line #f "pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/wordfreq.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-doc/compatibility" responsible (asumu stamourv) "pkgs/racket-pkgs/racket-doc/dynext" responsible (mflatt) "pkgs/racket-pkgs/racket-doc/ffi/examples" responsible (eli) -"pkgs/racket-pkgs/racket-doc/ffi/examples/c-printf.rkt" drdr:command-line (mzc "-k" *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/esd.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/magick.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/sndfile.rkt" responsible (clements) drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/tcl.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/use-c-printf.rkt" drdr:command-line (mzc "-k" *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/use-esd.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/use-magick.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/use-sndfile.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/use-tcl.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/use-xmmsctrl.rkt" drdr:command-line #f -"pkgs/racket-pkgs/racket-doc/ffi/examples/use-xosd.rkt" drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-doc/ffi/examples/xmmsctrl.rkt" drdr:command-line #f -"pkgs/racket-pkgs/racket-doc/ffi/examples/xosd.rkt" drdr:command-line (mzc *) +"pkgs/racket-pkgs/racket-doc/ffi/examples/sndfile.rkt" responsible (clements) "pkgs/racket-pkgs/racket-doc/file" responsible (mflatt) "pkgs/racket-pkgs/racket-doc/help" responsible (robby) "pkgs/racket-pkgs/racket-doc/json" responsible (eli) @@ -1295,7 +970,6 @@ path/s is either such a string or a list of them. "pkgs/racket-pkgs/racket-doc/version" responsible (eli) "pkgs/racket-pkgs/racket-doc/xml" responsible (jay) "pkgs/racket-pkgs/racket-test/tests/file" responsible (eli mflatt) -"pkgs/racket-pkgs/racket-test/tests/file/main.rkt" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/future" responsible (jamesswaine mflatt robby) "pkgs/racket-pkgs/racket-test/tests/future/future.rkt" drdr:timeout 200 drdr:random #t "pkgs/racket-pkgs/racket-test/tests/future/random-future.rkt" drdr:timeout 480 drdr:random #t @@ -1305,9 +979,7 @@ path/s is either such a string or a list of them. "pkgs/racket-pkgs/racket-test/tests/match" responsible (samth) "pkgs/racket-pkgs/racket-test/tests/openssl" responsible (mflatt) "pkgs/racket-pkgs/racket-test/tests/openssl/basic.rkt" drdr:random #t -"pkgs/racket-pkgs/racket-test/tests/pkg" responsible (jay) drdr:command-line (mzc *) -"pkgs/racket-pkgs/racket-test/tests/pkg/test-pkgs" drdr:command-line #f -"pkgs/racket-pkgs/racket-test/tests/pkg/test.rkt" drdr:command-line (raco "test" *) drdr:timeout 2400 +"pkgs/racket-pkgs/racket-test/tests/pkg" responsible (jay) "pkgs/racket-pkgs/racket-test/tests/racket" responsible (mflatt) "pkgs/racket-pkgs/racket-test/tests/racket/all.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/async-channel.rktl" drdr:command-line #f @@ -1322,18 +994,12 @@ path/s is either such a string or a list of them. "pkgs/racket-pkgs/racket-test/tests/racket/collects.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/contmark.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/contract" responsible (robby) -"pkgs/racket-pkgs/racket-test/tests/racket/contract/all.rkt" drdr:command-line (raco "make" *) -"pkgs/racket-pkgs/racket-test/tests/racket/contract-opt-tests.rkt" responsible (robby) drdr:command-line (racket "-r" *) -"pkgs/racket-pkgs/racket-test/tests/racket/contract-rand-test.rkt" responsible (robby) drdr:command-line (racket *) -"pkgs/racket-pkgs/racket-test/tests/racket/contract-stress-argmin.rkt" responsible (robby) drdr:command-line (racket "-r" *) -"pkgs/racket-pkgs/racket-test/tests/racket/contract-stress-take-right.rkt" responsible (robby) drdr:command-line (racket "-r" *) "pkgs/racket-pkgs/racket-test/tests/racket/control.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/core-tests.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/cstruct.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/date.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/deep.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/dict.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-test/tests/racket/embed-in-c.rkt" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/expand.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/extflonum.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/file.rktl" drdr:command-line #f @@ -1347,7 +1013,6 @@ path/s is either such a string or a list of them. "pkgs/racket-pkgs/racket-test/tests/racket/generator.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/id-table-test.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/iostream.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-test/tests/racket/link.rkt" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/list.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/loadable.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/loadtest.rktl" drdr:command-line #f @@ -1380,7 +1045,6 @@ path/s is either such a string or a list of them. "pkgs/racket-pkgs/racket-test/tests/racket/place-channel-ffi.rkt" responsible (tewk) "pkgs/racket-pkgs/racket-test/tests/racket/place-channel-socket.rkt" responsible (tewk) drdr:random #t "pkgs/racket-pkgs/racket-test/tests/racket/place-channel.rkt" responsible (tewk) drdr:timeout 300 drdr:random #t -"pkgs/racket-pkgs/racket-test/tests/racket/place-parallel.rkt" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/place.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/places.rkt" responsible (tewk) "pkgs/racket-pkgs/racket-test/tests/racket/port.rktl" drdr:command-line #f @@ -1410,7 +1074,7 @@ path/s is either such a string or a list of them. "pkgs/racket-pkgs/racket-test/tests/racket/stress" responsible (jay) drdr:random #t "pkgs/racket-pkgs/racket-test/tests/racket/stress/contract-lifting.rkt" responsible (robby sstrickl) "pkgs/racket-pkgs/racket-test/tests/racket/stress/dict.rkt" drdr:timeout 180 -"pkgs/racket-pkgs/racket-test/tests/racket/stress/fuzz.rkt" responsible (samth mflatt) drdr:command-line (racket * "-c") drdr:timeout 600 +"pkgs/racket-pkgs/racket-test/tests/racket/stress/fuzz.rkt" responsible (samth mflatt) drdr:timeout 600 "pkgs/racket-pkgs/racket-test/tests/racket/stress/module-stack.rkt" drdr:timeout 500 "pkgs/racket-pkgs/racket-test/tests/racket/string.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/struct.rktl" drdr:command-line #f @@ -1434,102 +1098,47 @@ path/s is either such a string or a list of them. "pkgs/racket-pkgs/racket-test/tests/racket/vector.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/version.rktl" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/racket/will.rktl" drdr:command-line #f -"pkgs/racket-pkgs/racket-test/tests/run-automated-tests.rkt" responsible (eli) drdr:command-line (mzc "-k" *) drdr:timeout 600 "pkgs/racket-pkgs/racket-test/tests/stress.rkt" responsible (jay) "pkgs/racket-pkgs/racket-test/tests/stxparse" responsible (ryanc) -"pkgs/racket-pkgs/racket-test/tests/stxparse/stress-template.rkt" drdr:command-line #f "pkgs/racket-pkgs/racket-test/tests/syntax" responsible (stamourv mflatt) "pkgs/racket-pkgs/racket-test/tests/units" responsible (sstrickl) "pkgs/racket-pkgs/racket-test/tests/utils/sexp-diff.rkt" responsible (clements) "pkgs/racket-pkgs/racket-test/tests/xml" responsible (jay) -"pkgs/racket-pkgs/racket-test/tests/xml/test-clark.rkt" drdr:command-line #f drdr:timeout 300 +"pkgs/racket-pkgs/racket-test/tests/xml/test-clark.rkt" drdr:timeout 300 "pkgs/racket-pkgs/racket-test/tests/zo-path.rkt" responsible (mflatt) "pkgs/racket-pkgs/racket-test/tests/zo-size.rkt" responsible (jay) drdr:random #t "pkgs/racklog" responsible (jay) "pkgs/rackunit-pkgs" responsible (ryanc noel) "pkgs/rackunit-pkgs/rackunit-doc/rackunit" responsible (jay noel ryanc) -"pkgs/rackunit-pkgs/rackunit-doc/rackunit/scribblings/file-test.rkt" drdr:command-line #f "pkgs/rackunit-pkgs/rackunit-test/tests/rackunit" responsible (jay noel) -"pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/log.rkt" drdr:command-line (racket "-t" *) -"pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/pr10950.rkt" drdr:command-line (racket "-t" *) -"pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/run-tests.rkt" drdr:command-line (racket "-t" *) -"pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-check-test.rkt" drdr:command-line #f -"pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-test-case-test.rkt" drdr:command-line #f -"pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone.rkt" drdr:command-line (racket "-jt" *) -"pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/tl.rkt" drdr:command-line (racket "-t" *) "pkgs/readline-pkgs" responsible (mflatt) "pkgs/realm" responsible (matthias) "pkgs/redex-pkgs" responsible (robby bfetscher) "pkgs/redex-pkgs/redex-doc/redex/redex.scrbl" drdr:timeout 300 "pkgs/redex-pkgs/redex-doc/redex/scribblings/tut.scrbl" drdr:timeout 300 -"pkgs/redex-pkgs/redex-examples/redex/examples/arithmetic.rkt" drdr:command-line (racket * "--no-print") -"pkgs/redex-pkgs/redex-examples/redex/examples/church.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/combinators.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/compatible-closure.rkt" drdr:command-line (mzc *) "pkgs/redex-pkgs/redex-examples/redex/examples/delim-cont/randomized-tests-test.rkt" drdr:timeout 240 -"pkgs/redex-pkgs/redex-examples/redex/examples/delim-cont/randomized-tests.rkt" drdr:command-line (racket * "--rules" "2250" "--size" "3") drdr:timeout 240 drdr:random #t -"pkgs/redex-pkgs/redex-examples/redex/examples/delim-cont/test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/letrec.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/list-machine/slides.rkt" drdr:command-line (raco "make" *) -"pkgs/redex-pkgs/redex-examples/redex/examples/omega.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/r6rs/r6rs-tests.rkt" drdr:command-line (mzc *) +"pkgs/redex-pkgs/redex-examples/redex/examples/delim-cont/randomized-tests.rkt" drdr:timeout 240 drdr:random #t "pkgs/redex-pkgs/redex-examples/redex/examples/r6rs/racket-vs-redex.rkt" drdr:timeout 180 -"pkgs/redex-pkgs/redex-examples/redex/examples/r6rs/show-examples.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/racket-machine/examples.rkt" drdr:command-line (racket * "--no-pop-ups") -"pkgs/redex-pkgs/redex-examples/redex/examples/racket-machine/impl-exec.rkt" drdr:command-line (raco "make" *) "pkgs/redex-pkgs/redex-examples/redex/examples/racket-machine/randomized-tests.rkt" drdr:timeout 300 -"pkgs/redex-pkgs/redex-examples/redex/examples/racket-machine/reduction-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/racket-machine/verification-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/semaphores.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/subject-reduction.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/threads.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-examples/redex/examples/types.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-lib/redex/private/compiler" drdr:command-line #f -"pkgs/redex-pkgs/redex-test/redex/tests/bitmap-test.rkt" drdr:command-line (mzc "-k" *) -"pkgs/redex-pkgs/redex-test/redex/tests/check-syntax-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/color-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/compiler" drdr:command-line #f -"pkgs/redex-pkgs/redex-test/redex/tests/core-layout-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/enum-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/hole-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/keyword-macros-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/matcher-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/pict-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/rg-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/run-tests.rkt" drdr:command-line (racket * "--examples" "--no-bitmap-gui") drdr:timeout 360 +"pkgs/redex-pkgs/redex-test/redex/tests/run-tests.rkt" drdr:timeout 360 "pkgs/redex-pkgs/redex-test/redex/tests/ryr-test.rkt" drdr:timeout 200 drdr:random #t -"pkgs/redex-pkgs/redex-test/redex/tests/stepper-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/term-test.rkt" drdr:command-line (mzc *) -"pkgs/redex-pkgs/redex-test/redex/tests/test-docs-complete.rkt" drdr:command-line (raco "make" *) -"pkgs/redex-pkgs/redex-test/redex/tests/tl-test.rkt" drdr:command-line (mzc *) "pkgs/sandbox-lib" responsible (eli) "pkgs/scheme-lib" responsible (mflatt) "pkgs/scheme-lib/scheme/match.rkt" responsible (samth) "pkgs/schemeunit" responsible (jay) "pkgs/scribble-pkgs" responsible (mflatt eli) -"pkgs/scribble-pkgs/scribble-lib/help/help.rkt" drdr:command-line (mzc *) "pkgs/scribble-pkgs/scribble-lib/scribble/html" responsible (eli) "pkgs/scribble-pkgs/scribble-lib/scribble/html.rkt" responsible (eli) -"pkgs/scribble-pkgs/scribble-lib/scribble/jfp/lang.rkt" drdr:command-line (mzc *) -"pkgs/scribble-pkgs/scribble-lib/scribble/lncs/lang.rkt" drdr:command-line (mzc *) -"pkgs/scribble-pkgs/scribble-lib/scribble/run.rkt" drdr:command-line (mzc *) "pkgs/scribble-pkgs/scribble-test/tests/scriblib" responsible (mflatt) "pkgs/scribble-pkgs/scribble-text-lib/scribble/text.rkt" responsible (eli) "pkgs/serialize-cstruct-lib" responsible (mflatt) "pkgs/sgl" responsible (jay) -"pkgs/sgl/examples/alpha.rkt" drdr:command-line (mzc *) -"pkgs/sgl/examples/gears.rkt" drdr:command-line (mzc "-k" *) "pkgs/shell-completion" responsible (samth sstrickl stamourv) "pkgs/shell-completion/racket-completion.bash" drdr:command-line #f "pkgs/shell-completion/racket-completion.zsh" responsible (eli) "pkgs/slatex" responsible (sstrickl) -"pkgs/slatex/pdf-slatex-launcher.rkt" drdr:command-line (mzc *) -"pkgs/slatex/slatex-launcher.rkt" drdr:command-line (mzc *) "pkgs/slideshow-pkgs" responsible (mflatt robby) "pkgs/slideshow-pkgs/slideshow-exe/slideshow/examples/interlocking-components.scm" drdr:command-line (mzc *) -"pkgs/slideshow-pkgs/slideshow-exe/slideshow/start.rkt" drdr:command-line (mzc *) -"pkgs/slideshow-pkgs/slideshow-exe/slideshow/tutorial-show.rkt" drdr:command-line (mzc *) -"pkgs/slideshow-pkgs/slideshow-plugin/texpict/face-demo.rkt" drdr:command-line (mzc *) "pkgs/snip-pkgs" responsible (mflatt) "pkgs/srfi-pkgs" responsible (mflatt noel chongkai jay) "pkgs/srfi-pkgs/srfi-lib/srfi/25/arlib.scm" drdr:command-line #f @@ -1544,19 +1153,13 @@ path/s is either such a string or a list of them. "pkgs/syntax-color-pkgs" responsible (mflatt) "pkgs/trace" responsible (mflatt robby) "pkgs/typed-racket-pkgs" responsible (samth stamourv asumu endobson) -"pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/base-env/base-special-env.rkt" drdr:command-line (raco "make" *) "pkgs/typed-racket-pkgs/typed-racket-lib/unstable/logging.rkt" responsible (stamourv) "pkgs/typed-racket-pkgs/typed-racket-lib/unstable/match.rkt" responsible (samth) "pkgs/typed-racket-pkgs/typed-racket-more/typed/rackunit" responsible (jay) -"pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/fail" drdr:command-line #f "pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/fail/with-type3.rkt" responsible (sstrickl samth stamourv asumu endobson) -"pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/nightly-run.rkt" drdr:command-line #f "pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/run.rkt" drdr:timeout 1200 -"pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/transform.rkt" drdr:command-line #f -"pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/run.rkt" drdr:command-line (racket * "--nightly") drdr:timeout 1800 -"pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/succeed/submodules.rkt" drdr:command-line (racket * "1") +"pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/run.rkt" drdr:timeout 1800 "pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/tr-random-testing.rkt" drdr:timeout 300 drdr:random #t -"pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/xfail" drdr:command-line #f "pkgs/unstable-2d" responsible (robby) "pkgs/unstable-contract-lib" responsible (robby ryanc) "pkgs/unstable-debug-lib" responsible (samth) @@ -1590,71 +1193,23 @@ path/s is either such a string or a list of them. "pkgs/unstable-pretty-lib" responsible (cce) "pkgs/unstable-redex" responsible (ryanc) "pkgs/web-server-pkgs" responsible (jay) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/dummy-10.rkt" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/dummy-3.rkt" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-1.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-10.rkt" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-11.rkt" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-2.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-3.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-4.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-5.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-6.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-7.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-8.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/iteration-9.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/model-3.rkt" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/no-use-redirect.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/send-suspend-1.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/send-suspend-2.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/test-static.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/use-redirect.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/configuration-table.rkt" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/add-dispatch.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/bad-xexpr.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/basic.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/cookie.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/cookie2.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/digest.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/english-measure-questions.rkt" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-lib/web-server/main.rkt" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-test/tests/web-server/pr/length.rkt" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-test/tests/web-server/pr/methods.rkt" drdr:command-line #f "pkgs/web-server-pkgs/web-server-test/tests/web-server/run-all-tests.rkt" drdr:timeout 300 -"pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/env.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/insta.rkt" drdr:command-line (mzc "-k" *) -"pkgs/web-server-pkgs/web-server-test/tests/web-server/stress" drdr:command-line #f -"pkgs/web-server-pkgs/web-server-test/tests/web-server/template/examples/blog-xexpr.rkt" drdr:command-line (mzc *) -"pkgs/web-server-pkgs/web-server-test/tests/web-server/template/examples/blog.rkt" drdr:command-line (mzc *) "pkgs/wxme-pkgs" responsible (mflatt) "pkgs/wxme-pkgs/wxme-lib/wxme/xml.rkt" responsible (jay) "pkgs/xrepl-pkgs" responsible (eli) -"pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/known-module.rkt" drdr:command-line (racket *) -"pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/main.rkt" drdr:command-line #f -"pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/wrapped-output.rkt" drdr:command-line (racket *) -"pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/xrepl.rkt" drdr:command-line (racket *) "racket" responsible (mflatt) "racket/collects/ffi" responsible (eli mflatt) -"racket/collects/ffi/objc.rkt" drdr:command-line (mzc *) -"racket/collects/ffi/unsafe/objc.rkt" drdr:command-line (mzc *) "racket/collects/racket/contract" responsible (robby) "racket/collects/racket/generic.rkt" responsible (asumu stamourv cce) "racket/collects/racket/match" responsible (samth) "racket/collects/racket/match.rkt" responsible (samth) -"racket/collects/racket/performance-hint.rkt" responsible (stamourv) drdr:command-line (raco "test" *) +"racket/collects/racket/performance-hint.rkt" responsible (stamourv) "racket/collects/racket/place" responsible (tewk) "racket/collects/racket/private/generic-interfaces.rkt" responsible (asumu stamourv cce) "racket/collects/racket/private/generic-methods.rkt" responsible (asumu stamourv cce) "racket/collects/racket/private/generic.rkt" responsible (asumu stamourv cce) "racket/collects/racket/private/shared-body.rktl" drdr:command-line #f -"racket/collects/raco/main.rkt" drdr:command-line #f -"racket/collects/raco/raco.rkt" drdr:command-line #f "racket/collects/s-exp" responsible (eli mflatt) -"racket/collects/setup/main.rkt" drdr:command-line #f -"racket/collects/setup/setup-go.rkt" drdr:command-line #f -"racket/collects/setup/unixstyle-install.rkt" drdr:command-line (mzc *) -"racket/collects/setup/winstrip.rkt" drdr:command-line (mzc *) -"racket/collects/setup/winvers.rkt" drdr:command-line (mzc *) "racket/collects/syntax/parse" responsible (ryanc) "racket/collects/syntax/parse.rkt" responsible (ryanc) "racket/collects/unstable/sequence.rkt" responsible (samth) diff --git a/pkgs/r6rs-pkgs/r6rs-lib/r6rs/run.rkt b/pkgs/r6rs-pkgs/r6rs-lib/r6rs/run.rkt index c2d25854f7..7fada3b03b 100644 --- a/pkgs/r6rs-pkgs/r6rs-lib/r6rs/run.rkt +++ b/pkgs/r6rs-pkgs/r6rs-lib/r6rs/run.rkt @@ -9,6 +9,8 @@ "private/readtable.rkt" "private/encode-name.rkt") +(module test racket/base) + (define install-mode (make-parameter #f)) (define compile-mode (make-parameter #f)) (define install-all-users (make-parameter #f)) diff --git a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/auto.rkt b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/auto.rkt index c491b97c25..e478443d8e 100755 --- a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/auto.rkt +++ b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/common/auto.rkt @@ -635,4 +635,12 @@ exec racket -qu "$0" ${1+"$@"} (map (lambda (bm) (run-benchmark impl bm)) actual-benchmarks-to-run)) - actual-implementations-to-run))) + actual-implementations-to-run)) + + ;; Test mode: + (module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments + (vector "--" "racket" "earley")]) + (dynamic-require (quote-module-path "..") #f)))) + diff --git a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/places/info.rkt b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/places/info.rkt new file mode 100644 index 0000000000..a5b71b1dd7 --- /dev/null +++ b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/places/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-omit-paths 'all) diff --git a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/rx/auto.rkt b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/rx/auto.rkt index f27445abe7..d1832b1eb2 100755 --- a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/rx/auto.rkt +++ b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/rx/auto.rkt @@ -322,4 +322,13 @@ exec racket -qu "$0" ${1+"$@"} (for-each (lambda (bm) (run i bm)) actual-benchmarks-to-run)) - actual-implementations-to-run)) + actual-implementations-to-run) + + ;; Test mode: + (module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments + (vector "racket" "simple")]) + (dynamic-require (quote-module-path "..") #f)) + (module config info + (define timeout 600)))) diff --git a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/info.rkt b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/info.rkt new file mode 100644 index 0000000000..b2338a8c09 --- /dev/null +++ b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/info.rkt @@ -0,0 +1,39 @@ +#lang info + +(define test-omit-paths '("spellcheck.rkt")) + +(define test-command-line-arguments + '(("ackermann.rkt" ("10")) + ("auto.rkt" ("hello")) + ("binarytrees-normal.rkt" ("10")) + ("binarytrees-places.rkt" ("10")) + ("binarytrees.rkt" ("10")) + ("chameneos.rkt" ("10")) + ("cheapconcurrency.rkt" ("10")) + ("fannkuch-redux.rkt" ("4")) + ("fannkuch.rkt" ("4")) + ("fasta-new.rkt" ("10")) + ("fasta.rkt" ("10")) + ("hash.rkt" ("10")) + ("hash2.rkt" ("10")) + ("mandelbrot-futures.rkt" ("15")) + ("mandelbrot-generic.rkt" ("15")) + ("mandelbrot.rkt" ("15")) + ("meteor.rkt" ("10")) + ("nbody-generic.rkt" ("10")) + ("nbody-vec-generic.rkt" ("10")) + ("nbody-vec.rkt" ("10")) + ("nbody.rkt" ("10")) + ("nestedloop.rkt" ("2")) + ("nsieve.rkt" ("2")) + ("nsievebits.rkt" ("2")) + ("partialsums.rkt" ("25")) + ("pidigits-gmp.rkt" ("10")) + ("pidigits.rkt" ("25")) + ("random.rkt" ("25")) + ("recursive.rkt" ("2")) + ("spectralnorm-generic.rkt" ("25")) + ("spectralnorm-par.rkt" ("25")) + ("spectralnorm.rkt" ("25")) + ("strcat.rkt" ("25")) + ("thread-ring.rkt" ("25")))) diff --git a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/run.rkt b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/run.rkt index 5e948d722e..2b53300a74 100644 --- a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/run.rkt +++ b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/run.rkt @@ -2,6 +2,7 @@ (require (only scheme/runtime-path define-runtime-path) racket/port mzlib/kw) + (module test racket/base) (define input-map `( ("ackermann" "12") diff --git a/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/info.rkt b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/info.rkt new file mode 100644 index 0000000000..3c7ed96e5f --- /dev/null +++ b/pkgs/racket-pkgs/racket-benchmarks/tests/racket/benchmarks/shootout/typed/info.rkt @@ -0,0 +1,66 @@ +#lang info + +(define test-omit-paths '("reversecomplement-non-optimizing.rkt" + "reversecomplement-optimizing.rkt" + "wc-non-optimizing.rkt" + "wc-optimizing.rkt" + "wordfreq-non-optimizing.rkt" + "wordfreq-optimizing.rkt" + "spellcheck-non-optimizing.rkt" + "spellcheck-optimizing.rkt")) + +(define test-command-line-arguments + '(("ackermann-non-optimizing.rkt" ("10")) + ("ackermann-optimizing.rkt" ("10")) + ("binarytrees-non-optimizing.rkt" ("10")) + ("binarytrees-optimizing.rkt" ("10")) + ("chameneos-non-optimizing.rkt" ("10")) + ("chameneos-optimizing.rkt" ("10")) + ("cheapconcurrency-non-optimizing.rkt" ("10")) + ("cheapconcurrency-optimizing.rkt" ("10")) + ("fannkuch-non-optimizing.rkt" ("4")) + ("fannkuch-optimizing.rkt" ("4")) + ("fannkuch-redux-non-optimizing.rkt" ("4")) + ("fannkuch-redux-optimizing.rkt" ("4")) + ("fasta-non-optimizing.rkt" ("10")) + ("fasta-optimizing.rkt" ("10")) + ("hash-non-optimizing.rkt" ("10")) + ("hash-optimizing.rkt" ("10")) + ("hash2-non-optimizing.rkt" ("10")) + ("hash2-optimizing.rkt" ("10")) + ("mandelbrot-generic-non-optimizing.rkt" ("15")) + ("mandelbrot-generic-optimizing.rkt" ("15")) + ("mandelbrot-non-optimizing.rkt" ("15")) + ("mandelbrot-optimizing.rkt" ("15")) + ("meteor-non-optimizing.rkt" ("10")) + ("meteor-optimizing.rkt" ("10")) + ("nbody-generic-non-optimizing.rkt" ("10")) + ("nbody-generic-optimizing.rkt" ("10")) + ("nbody-non-optimizing.rkt" ("10")) + ("nbody-optimizing.rkt" ("10")) + ("nbody-vec-generic-non-optimizing.rkt" ("10")) + ("nbody-vec-generic-optimizing.rkt" ("10")) + ("nbody-vec-non-optimizing.rkt" ("10")) + ("nbody-vec-optimizing.rkt" ("10")) + ("nestedloop-non-optimizing.rkt" ("2")) + ("nestedloop-optimizing.rkt" ("2")) + ("nsieve-non-optimizing.rkt" ("2")) + ("nsieve-optimizing.rkt" ("2")) + ("nsievebits-non-optimizing.rkt" ("2")) + ("nsievebits-optimizing.rkt" ("2")) + ("partialsums-non-optimizing.rkt" ("25")) + ("partialsums-optimizing.rkt" ("25")) + ("pidigits-non-optimizing.rkt" ("25")) + ("pidigits-optimizing.rkt" ("25")) + ("random-non-optimizing.rkt" ("25")) + ("random-optimizing.rkt" ("25")) + ("recursive-non-optimizing.rkt" ("2")) + ("recursive-optimizing.rkt" ("2")) + ("spectralnorm-generic-non-optimizing.rkt" ("25")) + ("spectralnorm-generic-optimizing.rkt" ("25")) + ("spectralnorm-non-optimizing.rkt" ("25")) + ("spectralnorm-optimizing.rkt" ("25")) + ("strcat-non-optimizing.rkt" ("25")) + ("strcat-optimizing.rkt" ("25")) + ("thread-ring-non-optimizing.rkt" ("25")) + ("thread-ring-optimizing.rkt" ("25")))) diff --git a/pkgs/racket-pkgs/racket-doc/ffi/examples/info.rkt b/pkgs/racket-pkgs/racket-doc/ffi/examples/info.rkt new file mode 100644 index 0000000000..6c26878b2a --- /dev/null +++ b/pkgs/racket-pkgs/racket-doc/ffi/examples/info.rkt @@ -0,0 +1,14 @@ +#lang info + +(define test-omit-paths '("xmmsctrl.rkt" + "use-xmmsctrl.rkt" + "esd.rkt" + "magick.rkt" + "sndfile.rkt" + "tcl.rkt" + "use-esd.rkt" + "use-magick.rkt" + "use-sndfile.rkt" + "use-tcl.rkt" + "use-xosd.rkt" + "xosd.rkt")) diff --git a/pkgs/racket-pkgs/racket-test/tests/file/main.rkt b/pkgs/racket-pkgs/racket-test/tests/file/main.rkt index ae5931e211..df4174f16e 100644 --- a/pkgs/racket-pkgs/racket-test/tests/file/main.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/file/main.rkt @@ -1,5 +1,8 @@ #lang racket/base +(module test racket/base + (displayln "run as program for tests")) + (require tests/eli-tester (prefix-in gzip: "gzip.rkt") (prefix-in md5: "md5.rkt") diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/info.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/info.rkt index df3fed557c..b1900232e5 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/info.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/info.rkt @@ -1,4 +1,5 @@ #lang info (define compile-omit-paths '("test-pkgs")) +(define test-omit-paths '("test-pkgs")) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/test.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/test.rkt index 2a9f12e31e..920d3fb63b 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/test.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/test.rkt @@ -56,3 +56,7 @@ "binary" "catalogs" "failure") + +(module+ test + (module config info + (define timeout 2400))) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-basic.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-basic.rkt index 8e6e3664e0..0d29c6d3e1 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-basic.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-basic.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-case "Each command has an associated help" diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-binary.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-binary.rkt index 6999f00560..7a10678207 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-binary.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-binary.rkt @@ -4,6 +4,8 @@ racket/file file/unzip) +(this-test-is-run-by-the-main-test) + (pkg-tests $ "raco pkg install --deps fail test-pkgs/pkg-x/" =exit> 1 diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-catalogs.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-catalogs.rkt index 0ea934d6b0..282afd745f 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-catalogs.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-catalogs.rkt @@ -6,6 +6,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-checksums.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-checksums.rkt index adedf5abee..4b3a1c947e 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-checksums.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-checksums.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-config.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-config.rkt index 3efab542da..bcef764690 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-config.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-config.rkt @@ -2,6 +2,8 @@ (require "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (with-fake-root (shelly-case diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-conflicts.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-conflicts.rkt index bb8d35f252..6be3390f79 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-conflicts.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-conflicts.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-create.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-create.rkt index 8dc0785958..b7e164d12f 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-create.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-create.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (shelly-case diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-deps.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-deps.rkt index 0448f78a9d..a07b6492fd 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-deps.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-deps.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-failure.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-failure.rkt index b03ff3600e..203f498c91 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-failure.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-failure.rkt @@ -5,6 +5,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-implies.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-implies.rkt index 5aba83725f..65b8328748 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-implies.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-implies.rkt @@ -3,6 +3,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-install.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-install.rkt index 85275ba686..0ad32b5af2 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-install.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-install.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-locking.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-locking.rkt index 3b28202bf8..6cf7378ea2 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-locking.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-locking.rkt @@ -5,6 +5,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (with-fake-root (shelly-case diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-main-server.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-main-server.rkt index 84b312560f..c19fe54472 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-main-server.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-main-server.rkt @@ -2,6 +2,8 @@ (require "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (with-fake-root (shelly-case diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-migrate.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-migrate.rkt index 344b965833..a4eacc5f99 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-migrate.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-migrate.rkt @@ -4,6 +4,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (with-fake-root (shelly-case diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-name.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-name.rkt index e8c2f73744..97af9de369 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-name.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-name.rkt @@ -3,6 +3,8 @@ pkg/name "util.rkt") +(this-test-is-run-by-the-main-test) + (define-syntax check-equal-values? (syntax-rules (values) [(_ expr (values a ...)) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-network.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-network.rkt index afc2dcb4a5..44240d69ad 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-network.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-network.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + ;; todo: to move the test packages to the "plt" account on GitHub (pkg-tests diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-overwrite.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-overwrite.rkt index b2f11a859e..ca3f7d3a41 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-overwrite.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-overwrite.rkt @@ -2,6 +2,8 @@ (require "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (with-fake-root (shelly-case diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-permissions.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-permissions.rkt index b1799bbab0..b3118cf463 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-permissions.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-permissions.rkt @@ -2,6 +2,8 @@ (require "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (define dir (getenv "PLTADDONDIR")) (define pkg-dir (build-path dir "pkgs")) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-planet.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-planet.rkt index f18abe1dc9..d9ccbd7eed 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-planet.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-planet.rkt @@ -2,6 +2,8 @@ (require "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (with-fake-root (shelly-case diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-platform.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-platform.rkt index c9fab9ec74..b3ee22daaa 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-platform.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-platform.rkt @@ -7,6 +7,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (define pkgs-dir (make-temporary-file "~a-pkgs" 'directory)) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-promote.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-promote.rkt index 49da799ea6..e95c49b812 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-promote.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-promote.rkt @@ -5,6 +5,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-raco.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-raco.rkt index 3c3a0d5006..f733d1308e 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-raco.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-raco.rkt @@ -2,6 +2,8 @@ (require "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (with-fake-root (shelly-case diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-remove.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-remove.rkt index fa1eccf012..f33a2c53bc 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-remove.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-remove.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-scope.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-scope.rkt index 9855d8a048..fdfe7181a0 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-scope.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-scope.rkt @@ -2,6 +2,8 @@ (require "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (with-fake-installation (with-fake-root diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update-auto.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update-auto.rkt index b6b727fb58..86cc10b446 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update-auto.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update-auto.rkt @@ -3,6 +3,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (define (init-update-deps-test) (shelly-begin (hash-set! *index-ht-1* "pkg-b" diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update-deps.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update-deps.rkt index 19cda848d2..7eb2290b66 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update-deps.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update-deps.rkt @@ -3,6 +3,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (define (init-update-deps-test) (shelly-begin (hash-set! *index-ht-1* "pkg-b" diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update.rkt index 106a222e1e..1355926617 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-update.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-versions.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-versions.rkt index 54c4357800..91a2619c84 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/tests-versions.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/tests-versions.rkt @@ -13,6 +13,8 @@ "shelly.rkt" "util.rkt") +(this-test-is-run-by-the-main-test) + (pkg-tests (shelly-begin (initialize-catalogs) diff --git a/pkgs/racket-pkgs/racket-test/tests/pkg/util.rkt b/pkgs/racket-pkgs/racket-test/tests/pkg/util.rkt index d373205983..7b9990fd36 100644 --- a/pkgs/racket-pkgs/racket-test/tests/pkg/util.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/pkg/util.rkt @@ -16,6 +16,9 @@ (define-runtime-path test-directory ".") +(define-syntax-rule (this-test-is-run-by-the-main-test) + (module test racket/base)) + (define (get-info-domain-cache-path) (define c (first (current-library-collection-paths))) (define p (build-path c "info-domain" "compiled" "cache.rktd")) diff --git a/pkgs/racket-pkgs/racket-test/tests/racket/contract/all.rkt b/pkgs/racket-pkgs/racket-test/tests/racket/contract/all.rkt index 170b739268..a68d9faee8 100644 --- a/pkgs/racket-pkgs/racket-test/tests/racket/contract/all.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/racket/contract/all.rkt @@ -3,9 +3,8 @@ racket/place "test-util.rkt") -(module drdr racket/base - ;; Run individual files for DrDr - (void)) +(module test racket/base + (displayln "run as program for tests")) (define parallel 1) (let ([argv (current-command-line-arguments)]) diff --git a/pkgs/racket-pkgs/racket-test/tests/racket/place-parallel.rkt b/pkgs/racket-pkgs/racket-test/tests/racket/place-parallel.rkt index 587830fc7e..cf5bd8ef57 100644 --- a/pkgs/racket-pkgs/racket-test/tests/racket/place-parallel.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/racket/place-parallel.rkt @@ -1,6 +1,6 @@ #lang racket -(module+ test +(module test racket/base (displayln "run as program for tests")) ;; Runs 3 places perfoming the test suite simultaneously. Each diff --git a/pkgs/racket-pkgs/racket-test/tests/racket/stress/fuzz.rkt b/pkgs/racket-pkgs/racket-test/tests/racket/stress/fuzz.rkt index 6e7c56e10f..cf8137358f 100644 --- a/pkgs/racket-pkgs/racket-test/tests/racket/stress/fuzz.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/racket/stress/fuzz.rkt @@ -55,3 +55,8 @@ (for ([p files]) (run p seed0))] [else (printf "Nothing to do.\n")]) (when forever? (loop)))) + +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments (vector "-c")]) + (dynamic-require (quote-module-path "..") #f))) diff --git a/pkgs/racket-pkgs/racket-test/tests/run-automated-tests.rkt b/pkgs/racket-pkgs/racket-test/tests/run-automated-tests.rkt index eb3449ce4f..2497b5431b 100755 --- a/pkgs/racket-pkgs/racket-test/tests/run-automated-tests.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/run-automated-tests.rkt @@ -1,5 +1,8 @@ #lang racket/base +;; Is this obsolete? It has been disabled in DrDr for a while. +(module test racket/base) + ;; To include a test, add an appropriate entry in `tests' below. ;; Notes: ;; - Each test is run in its own namespace, but there is very little diff --git a/pkgs/racket-pkgs/racket-test/tests/stxparse/stress-template.rkt b/pkgs/racket-pkgs/racket-test/tests/stxparse/stress-template.rkt index 60afc01d75..6e62239dad 100644 --- a/pkgs/racket-pkgs/racket-test/tests/stxparse/stress-template.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/stxparse/stress-template.rkt @@ -2,6 +2,8 @@ (require syntax/parse/experimental/template) (provide (all-defined-out)) +(module test racket/base) + (define (f1-stx stx) (syntax-case stx () [(_ body) diff --git a/pkgs/racket-pkgs/racket-test/tests/xml/test-clark.rkt b/pkgs/racket-pkgs/racket-test/tests/xml/test-clark.rkt index 1a97fe8786..7ddb7c8637 100644 --- a/pkgs/racket-pkgs/racket-test/tests/xml/test-clark.rkt +++ b/pkgs/racket-pkgs/racket-test/tests/xml/test-clark.rkt @@ -4,6 +4,8 @@ xml racket/runtime-path) +(module test racket/base) + (define (validate-xml? xml) (error 'validate-xml? "Not implemented")) (define (well-formed-xml? xml) diff --git a/pkgs/rackunit-pkgs/rackunit-doc/rackunit/scribblings/info.rkt b/pkgs/rackunit-pkgs/rackunit-doc/rackunit/scribblings/info.rkt new file mode 100644 index 0000000000..42edee6f51 --- /dev/null +++ b/pkgs/rackunit-pkgs/rackunit-doc/rackunit/scribblings/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-omit-paths '("file-test.rkt")) diff --git a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/log.rkt b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/log.rkt index 53841e9d2f..3176846018 100644 --- a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/log.rkt +++ b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/log.rkt @@ -2,6 +2,13 @@ (require rackunit rackunit/log) +(module test racket/base + (require syntax/location) + ;; Use a separate namespace to avoid logging results + ;; in this namespace (where `raco test` would see errors). + (parameterize ([current-namespace (make-base-namespace)]) + (dynamic-require (quote-module-path "..") #f))) + (define-syntax-rule (&& label stdout-e stdout-p) (let () (define stdout-ev stdout-e) diff --git a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/pr10950.rkt b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/pr10950.rkt index e07a898c48..5dc237e369 100644 --- a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/pr10950.rkt +++ b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/pr10950.rkt @@ -20,3 +20,10 @@ (regexp-quote "pr10950.rkt:14:51") (regexp-quote "0 success(es) 1 failure(s) 0 error(s) 1 test(s) run\n"))) output)) + +(module test racket/base + (require syntax/location) + ;; Use a separate namespace to avoid logging results + ;; in this namespace (where `raco test` would see errors). + (parameterize ([current-namespace (make-base-namespace)]) + (dynamic-require (quote-module-path "..") #f))) \ No newline at end of file diff --git a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/run-tests.rkt b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/run-tests.rkt index 18553fc405..b8329f827e 100644 --- a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/run-tests.rkt +++ b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/run-tests.rkt @@ -10,3 +10,10 @@ (parameterize ([current-error-port (current-output-port)] [current-output-port (current-error-port)]) (run-tests failure-tests)) + +(module test racket/base + (require syntax/location) + ;; Use a separate namespace to avoid logging results + ;; in this namespace (where `raco test` would see errors). + (parameterize ([current-namespace (make-base-namespace)]) + (dynamic-require (quote-module-path "..") #f))) \ No newline at end of file diff --git a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-check-test.rkt b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-check-test.rkt index 6187e38d8e..0570e8b4b4 100644 --- a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-check-test.rkt +++ b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-check-test.rkt @@ -33,6 +33,10 @@ (require rackunit/private/check) +;; Don't run this test automatically: +(module test racket/base + (displayln "run as program for tests")) + ;; This check should succeed (check = 1 1 0.0) diff --git a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-test-case-test.rkt b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-test-case-test.rkt index 78f9abcceb..36540c5ab2 100644 --- a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-test-case-test.rkt +++ b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone-test-case-test.rkt @@ -7,6 +7,10 @@ (require rackunit/private/check rackunit/private/test-case) +;; Don't run this test automatically: +(module test racket/base + (displayln "run as program for tests")) + ;; These tests should succeeds (test-begin (check-eq? 1 1)) (test-case "succeed" (check-eq? 1 1)) diff --git a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone.rkt b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone.rkt index 744e2cbf4e..fc920b4be3 100644 --- a/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone.rkt +++ b/pkgs/rackunit-pkgs/rackunit-test/tests/rackunit/standalone.rkt @@ -3,6 +3,13 @@ rackunit racket/path) +(module test racket/base + (require syntax/location) + ;; Use a separate namespace to avoid logging results + ;; in this namespace (where `raco test` would see errors). + (parameterize ([current-namespace (make-base-namespace)]) + (dynamic-require (quote-module-path "..") #f))) + (define-runtime-path here ".") (define collects (normalize-path (build-path here ".." ".."))) diff --git a/pkgs/redex-pkgs/redex-examples/redex/examples/arithmetic.rkt b/pkgs/redex-pkgs/redex-examples/redex/examples/arithmetic.rkt index f9a88a9605..fa77a6894e 100644 --- a/pkgs/redex-pkgs/redex-examples/redex/examples/arithmetic.rkt +++ b/pkgs/redex-pkgs/redex-examples/redex/examples/arithmetic.rkt @@ -57,3 +57,9 @@ (when print-name? (printf "Traces are in ~a\n" traces-file)) + +;; Test mode: no printing: +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments (vector "--no-print")]) + (dynamic-require (quote-module-path "..") #f))) diff --git a/pkgs/redex-pkgs/redex-examples/redex/examples/delim-cont/randomized-tests.rkt b/pkgs/redex-pkgs/redex-examples/redex/examples/delim-cont/randomized-tests.rkt index abca2773b9..31a6f6129e 100644 --- a/pkgs/redex-pkgs/redex-examples/redex/examples/delim-cont/randomized-tests.rkt +++ b/pkgs/redex-pkgs/redex-examples/redex/examples/delim-cont/randomized-tests.rkt @@ -8,6 +8,11 @@ (provide (all-defined-out)) (module+ main (apply main (vector->list (current-command-line-arguments)))) +(module+ test + (main "--rules" "2250" "--size" "3") + (module config info + (define timeout 240))) + (define (main . args) (define from-grammar-tests #f) (define from-rules-tests #f) diff --git a/pkgs/redex-pkgs/redex-examples/redex/examples/info.rkt b/pkgs/redex-pkgs/redex-examples/redex/examples/info.rkt index a0fdc8f995..9208ca242d 100644 --- a/pkgs/redex-pkgs/redex-examples/redex/examples/info.rkt +++ b/pkgs/redex-pkgs/redex-examples/redex/examples/info.rkt @@ -1,3 +1,20 @@ #lang info (define name "Reduction Semantics examples") + +(define test-omit-paths '("church.rkt" + "combinators.rkt" + "compatible-closure.rkt" + "delim-cont/test.rkt" + "letrec.rkt" + "list-machine/slides.rkt" + "omega.rkt" + "r6rs/r6rs-tests.rkt" + "r6rs/show-examples.rkt" + "racket-machine/impl-exec.rkt" + "racket-machine/reduction-test.rkt" + "racket-machine/verification-test.rkt" + "semaphores.rkt" + "subject-reduction.rkt" + "threads.rkt" + "types.rkt")) diff --git a/pkgs/redex-pkgs/redex-examples/redex/examples/racket-machine/examples.rkt b/pkgs/redex-pkgs/redex-examples/redex/examples/racket-machine/examples.rkt index f281087b46..17e06621d9 100644 --- a/pkgs/redex-pkgs/redex-examples/redex/examples/racket-machine/examples.rkt +++ b/pkgs/redex-pkgs/redex-examples/redex/examples/racket-machine/examples.rkt @@ -91,3 +91,9 @@ ;; model. Try the version bundled with Redex (see the README). (match-let ([(cons expr cycles) (racket->bytecode a-racket-program)]) (check-equal? (eval expr cycles) '(1))) + +;; Test mode: no windows: +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments (vector "--no-pop-ups")]) + (dynamic-require (quote-module-path "..") #f))) diff --git a/pkgs/redex-pkgs/redex-lib/redex/info.rkt b/pkgs/redex-pkgs/redex-lib/redex/info.rkt index 159928f76f..86419d2b5f 100644 --- a/pkgs/redex-pkgs/redex-lib/redex/info.rkt +++ b/pkgs/redex-pkgs/redex-lib/redex/info.rkt @@ -4,5 +4,3 @@ (define name "PLT Redex") (define release-note-files (list (list "Redex" "HISTORY.txt"))) - - diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/bitmap-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/bitmap-test.rkt index aef3d173b8..f649292b93 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/bitmap-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/bitmap-test.rkt @@ -3,6 +3,8 @@ redex/pict redex/reduction-semantics pict) +(module test racket/base) ; run by run-tests + ;; tests: ;; - language, ;; - multi-line non-terminals, single-line non-terminals diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/check-syntax-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/check-syntax-test.rkt index 674db251cf..c2ff50467e 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/check-syntax-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/check-syntax-test.rkt @@ -7,6 +7,8 @@ (for-syntax setup/path-to-relative) setup/path-to-relative) +(module test racket/base) + (reset-count) (define-syntax (identifier stx) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/color-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/color-test.rkt index 9918d883b2..c87dfe6020 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/color-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/color-test.rkt @@ -15,6 +15,8 @@ In the other window, you expect to see the currently unreducted terms in green a racket/gui/base racket/class) +(module test racket/base) + (reduction-steps-cutoff 1) (let () diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/compiler/info.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/compiler/info.rkt new file mode 100644 index 0000000000..a5b71b1dd7 --- /dev/null +++ b/pkgs/redex-pkgs/redex-test/redex/tests/compiler/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-omit-paths 'all) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/core-layout-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/core-layout-test.rkt index 87319b4e3a..a5befdbb1c 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/core-layout-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/core-layout-test.rkt @@ -5,6 +5,8 @@ "lw-test-util.rkt" "test-util.rkt") +(module test racket/base) + (require texpict/mrpict mred/mred mzlib/class) (dc-for-text-size (make-object bitmap-dc% (make-object bitmap% 1 1))) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/enum-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/enum-test.rkt index 7bc244d59e..b8b44ea76f 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/enum-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/enum-test.rkt @@ -3,6 +3,8 @@ redex/reduction-semantics (for-syntax racket/base)) +(module test racket/base) + (define-syntax (try-it stx) (syntax-case stx () [(_ N l p) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/hole-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/hole-test.rkt index 77342bade7..90d8ea6df5 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/hole-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/hole-test.rkt @@ -1,6 +1,8 @@ #lang scheme (require redex) +(module test racket/base) + (define-language tl-grammar [v (cont (hide-hole E))] [E hole diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/keyword-macros-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/keyword-macros-test.rkt index d92b82a035..aec1195579 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/keyword-macros-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/keyword-macros-test.rkt @@ -3,6 +3,8 @@ (require redex/private/keyword-macros "test-util.rkt") +(module test racket/base) + (reset-count) (let* ([formals `((#:b ,#'1) (#:c ,#'2))] diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/matcher-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/matcher-test.rkt index eb9d8d9308..c38a6cfa24 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/matcher-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/matcher-test.rkt @@ -6,6 +6,8 @@ (for-syntax racket/base) racket/list) +(module test racket/base) + (error-print-width 500) (define (make-test-mtch a b c) (make-mtch a (build-flat-context b) c)) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/pict-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/pict-test.rkt index ea24da6e98..425824d65e 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/pict-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/pict-test.rkt @@ -4,6 +4,8 @@ ;; happen. These tests are really only last resorts ;; for testing functions that aren't easily extraced ;; from the pict.rkt library + +(module test racket/base) (require redex/reduction-semantics redex/pict) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/rg-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/rg-test.rkt index 374962b720..23865a106e 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/rg-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/rg-test.rkt @@ -10,6 +10,8 @@ redex/private/keyword-macros redex/private/error) +(module test racket/base) + (define-namespace-anchor nsa) (define ns (namespace-anchor->namespace nsa)) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/run-tests.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/run-tests.rkt index 5956bbed98..eefba86155 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/run-tests.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/run-tests.rkt @@ -83,3 +83,12 @@ (printf "\nWARNING: didn't run color-test.rkt\n") (flush) + + +;; Test mode: +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments + (vector "--examples" "--no-bitmap-gui")]) + (dynamic-require (quote-module-path "..") #f))) + diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/stepper-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/stepper-test.rkt index 493e05722f..6dfa59a7e3 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/stepper-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/stepper-test.rkt @@ -7,6 +7,8 @@ redex/private/stepper redex/private/size-snip) +(module test racket/base) + (reset-count) ;; diff : term term -> (cons range range) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/term-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/term-test.rkt index 789c107293..eb0093ea86 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/term-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/term-test.rkt @@ -5,6 +5,8 @@ racket/function "test-util.rkt") +(module test racket/base) + (reset-count) (test (term 1) 1) (test (term (1 2)) (list 1 2)) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/test-docs-complete.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/test-docs-complete.rkt index 3930b7a78c..9ce05d476e 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/test-docs-complete.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/test-docs-complete.rkt @@ -1,4 +1,5 @@ #lang racket/base +(module test racket/base) ; <- DISABLES TEST (require rackunit/docs-complete) (check-docs (quote redex/reduction-semantics)) (check-docs (quote redex/pict)) diff --git a/pkgs/redex-pkgs/redex-test/redex/tests/tl-test.rkt b/pkgs/redex-pkgs/redex-test/redex/tests/tl-test.rkt index 0237e3909a..5c4bbff208 100644 --- a/pkgs/redex-pkgs/redex-test/redex/tests/tl-test.rkt +++ b/pkgs/redex-pkgs/redex-test/redex/tests/tl-test.rkt @@ -5,7 +5,9 @@ racket/match racket/trace redex/private/struct) - + + (module test racket/base) + (reset-count) diff --git a/pkgs/scribble-pkgs/scribble-lib/help/help.rkt b/pkgs/scribble-pkgs/scribble-lib/help/help.rkt index 732e42037e..383c7b3c19 100644 --- a/pkgs/scribble-pkgs/scribble-lib/help/help.rkt +++ b/pkgs/scribble-pkgs/scribble-lib/help/help.rkt @@ -17,3 +17,5 @@ (display help-str) (display " See the search page for the syntax of queries\n") (exit 0))) + +(module test racket/base) diff --git a/pkgs/scribble-pkgs/scribble-lib/scribble/jfp/lang.rkt b/pkgs/scribble-pkgs/scribble-lib/scribble/jfp/lang.rkt index e4a864453a..ade07da839 100644 --- a/pkgs/scribble-pkgs/scribble-lib/scribble/jfp/lang.rkt +++ b/pkgs/scribble-pkgs/scribble-lib/scribble/jfp/lang.rkt @@ -13,6 +13,8 @@ (all-from-out scribble/base) (rename-out [module-begin #%module-begin])) +(module test racket/base) + ;; No options, currently, but keep in case we want to support some: (define-syntax (module-begin stx) (syntax-case* stx () (lambda (a b) (eq? (syntax-e a) (syntax-e b))) diff --git a/pkgs/scribble-pkgs/scribble-lib/scribble/lncs/lang.rkt b/pkgs/scribble-pkgs/scribble-lib/scribble/lncs/lang.rkt index 6b14917093..c36a6b88b7 100644 --- a/pkgs/scribble-pkgs/scribble-lib/scribble/lncs/lang.rkt +++ b/pkgs/scribble-pkgs/scribble-lib/scribble/lncs/lang.rkt @@ -17,6 +17,8 @@ racket/list racket/stxparam-exptime)) +(module test racket/base) + (provide (except-out (all-from-out scribble/doclang) #%module-begin) (all-from-out scribble/base) (rename-out [module-begin #%module-begin]) diff --git a/pkgs/scribble-pkgs/scribble-lib/scribble/run.rkt b/pkgs/scribble-pkgs/scribble-lib/scribble/run.rkt index 53f9acd5bc..7a6930bfa5 100644 --- a/pkgs/scribble-pkgs/scribble-lib/scribble/run.rkt +++ b/pkgs/scribble-pkgs/scribble-lib/scribble/run.rkt @@ -1,5 +1,4 @@ #lang racket/base - (require "xref.rkt" "render.rkt" scheme/cmdline @@ -10,6 +9,8 @@ (prefix-in latex: "latex-render.rkt") (prefix-in pdf: "pdf-render.rkt")) +(module test racket/base) + (define multi-html:render-mixin (lambda (%) (html:render-multi-mixin (html:render-mixin %)))) diff --git a/pkgs/sgl/info.rkt b/pkgs/sgl/info.rkt index c1727fb9fb..ac799dd422 100644 --- a/pkgs/sgl/info.rkt +++ b/pkgs/sgl/info.rkt @@ -3,6 +3,7 @@ (define collection "sgl") (define compile-omit-paths '("examples")) +(define test-omit-paths '("examples")) (define scribblings '(("scribblings/sgl.scrbl" (multi-page) (gui-library)))) (define deps '("scheme-lib" diff --git a/pkgs/slatex/pdf-slatex-launcher.rkt b/pkgs/slatex/pdf-slatex-launcher.rkt index 76ece2e069..c172039939 100644 --- a/pkgs/slatex/pdf-slatex-launcher.rkt +++ b/pkgs/slatex/pdf-slatex-launcher.rkt @@ -2,6 +2,8 @@ (require "slatex-wrapper.rkt" scheme/cmdline) + (module test racket/base) + (define argv (current-command-line-arguments)) (define no-latex (make-parameter #f)) diff --git a/pkgs/slatex/slatex-launcher.rkt b/pkgs/slatex/slatex-launcher.rkt index 47c2c0f01f..a50ea691ad 100644 --- a/pkgs/slatex/slatex-launcher.rkt +++ b/pkgs/slatex/slatex-launcher.rkt @@ -2,6 +2,8 @@ (require "slatex-wrapper.rkt" scheme/cmdline) + (module test racket/base) + (define argv (current-command-line-arguments)) (define no-latex (make-parameter #f)) diff --git a/pkgs/slideshow-pkgs/slideshow-exe/slideshow/info.rkt b/pkgs/slideshow-pkgs/slideshow-exe/slideshow/info.rkt index 194b280f3c..58d436769c 100644 --- a/pkgs/slideshow-pkgs/slideshow-exe/slideshow/info.rkt +++ b/pkgs/slideshow-pkgs/slideshow-exe/slideshow/info.rkt @@ -3,3 +3,4 @@ (define mred-launcher-libraries (list "start.rkt")) (define mred-launcher-names (list "Slideshow")) (define compile-omit-paths '("initial-ones.rkt" "examples")) +(define test-omit-paths '("tutorial-show.rkt")) diff --git a/pkgs/slideshow-pkgs/slideshow-exe/slideshow/start.rkt b/pkgs/slideshow-pkgs/slideshow-exe/slideshow/start.rkt index dc21dcd4a6..0dc47a62cd 100644 --- a/pkgs/slideshow-pkgs/slideshow-exe/slideshow/start.rkt +++ b/pkgs/slideshow-pkgs/slideshow-exe/slideshow/start.rkt @@ -4,6 +4,8 @@ mred mzlib/class) + (module test racket/base) + ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Path utilities diff --git a/pkgs/slideshow-pkgs/slideshow-plugin/texpict/face-demo.rkt b/pkgs/slideshow-pkgs/slideshow-plugin/texpict/face-demo.rkt index f3dd178b5a..406c44c418 100644 --- a/pkgs/slideshow-pkgs/slideshow-plugin/texpict/face-demo.rkt +++ b/pkgs/slideshow-pkgs/slideshow-plugin/texpict/face-demo.rkt @@ -5,6 +5,8 @@ texpict/mrpict texpict/face) + (module test racket/base) + (define f (new frame% (label "frame"))) (define canvas-scale 1) diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/info.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/info.rkt new file mode 100644 index 0000000000..802d7d6d60 --- /dev/null +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/info.rkt @@ -0,0 +1,4 @@ +#lang info + +(define test-omit-paths '("fail" + "xfail")) diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/nightly-run.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/nightly-run.rkt index 04691b9cd2..2ca63ca5a9 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/nightly-run.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/nightly-run.rkt @@ -1,5 +1,8 @@ #lang racket/base +(module test racket/base + (displayln "run as program for tests")) + (require racket/runtime-path) (define-runtime-path run "run.rkt") (parameterize ([current-command-line-arguments '#("--nightly")]) diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/transform.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/transform.rkt index 7186868738..4f41e41786 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/transform.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/optimizer/transform.rkt @@ -2,6 +2,9 @@ (require "run.rkt" "../send-places.rkt") +(module test racket/base + (displayln "run as program for tests")) + ;; Assuming that only the log format changed, update test files to the ;; new format. ;; Running this after changes to the behavior of the optimizer is a diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/run.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/run.rkt index 07458d0c5b..5b48c6402c 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/run.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/run.rkt @@ -47,3 +47,11 @@ (unless (= 0 ((exec) to-run)) (eprintf "Typed Racket Tests did not pass.\n") (exit 1)))) + +;; Test mode: +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments (vector "--nightly")]) + (dynamic-require (quote-module-path "..") 0)) + (module config info + (define timeout 1800))) diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/succeed/submodules.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/succeed/submodules.rkt index 5893ff7ca1..2b5e4893b5 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/succeed/submodules.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/succeed/submodules.rkt @@ -9,3 +9,8 @@ (g (assert (string->number (vector-ref (current-command-line-arguments) 0))))) +;; Test mode: +(module test racket/base + (require syntax/location) + (parameterize ([current-command-line-arguments (vector "1")]) + (dynamic-require (quote-module-path "..") #f))) diff --git a/pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/info.rkt b/pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/info.rkt new file mode 100644 index 0000000000..a5b71b1dd7 --- /dev/null +++ b/pkgs/web-server-pkgs/web-server-doc/web-server/scribblings/tutorial/examples/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-omit-paths 'all) diff --git a/pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/english-measure-questions.rkt b/pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/english-measure-questions.rktd similarity index 100% rename from pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/english-measure-questions.rkt rename to pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/english-measure-questions.rktd diff --git a/pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/info.rkt b/pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/info.rkt new file mode 100644 index 0000000000..dd3354d122 --- /dev/null +++ b/pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/info.rkt @@ -0,0 +1,9 @@ +#lang info + +(define test-omit-paths '("add-dispatch.rkt" + "bad-xexpr.rkt" + "basic.rkt" + "cookie.rkt" + "cookie2.rkt" + "digest.rkt")) + diff --git a/pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/quiz.rkt b/pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/quiz.rkt index 99e7a61009..0e4fcd55d2 100644 --- a/pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/quiz.rkt +++ b/pkgs/web-server-pkgs/web-server-lib/web-server/default-web-root/htdocs/servlets/examples/quiz.rkt @@ -17,7 +17,7 @@ racket/file (for-syntax racket/base)) (define-runtime-path *data-file* - "english-measure-questions.rkt") + "english-measure-questions.rktd") (define *questions-per-quiz* 5) (require web-server/servlet diff --git a/pkgs/web-server-pkgs/web-server-lib/web-server/info.rkt b/pkgs/web-server-pkgs/web-server-lib/web-server/info.rkt index 6cd235a379..561ba91e00 100644 --- a/pkgs/web-server-pkgs/web-server-lib/web-server/info.rkt +++ b/pkgs/web-server-pkgs/web-server-lib/web-server/info.rkt @@ -3,4 +3,6 @@ (define mzscheme-launcher-libraries '("main.rkt")) (define mzscheme-launcher-names '("PLT Web Server")) -(define compile-omit-paths '("default-web-root")) +(define compile-omit-paths '("default-web-root/configuration-table.rkt")) +(define test-omit-paths '("default-web-root/configuration-table.rkt")) + diff --git a/pkgs/web-server-pkgs/web-server-lib/web-server/main.rkt b/pkgs/web-server-pkgs/web-server-lib/web-server/main.rkt index 5ce0f91ddc..940effe8a7 100644 --- a/pkgs/web-server-pkgs/web-server-lib/web-server/main.rkt +++ b/pkgs/web-server-pkgs/web-server-lib/web-server/main.rkt @@ -3,3 +3,5 @@ (only-in "web-server.rkt" do-not-return)) (void (serve)) (do-not-return) + +(module test racket/base) diff --git a/pkgs/web-server-pkgs/web-server-test/tests/web-server/pr/info.rkt b/pkgs/web-server-pkgs/web-server-test/tests/web-server/pr/info.rkt new file mode 100644 index 0000000000..f3fdec7171 --- /dev/null +++ b/pkgs/web-server-pkgs/web-server-test/tests/web-server/pr/info.rkt @@ -0,0 +1,4 @@ +#lang info + +(define test-omit-paths '("length.rkt" + "methods.rkt")) diff --git a/pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/env.rkt b/pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/env.rkt index d0964250d7..774601cc33 100644 --- a/pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/env.rkt +++ b/pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/env.rkt @@ -26,3 +26,5 @@ (serve/servlet start #:servlet-path "/") + +(module test racket/base) diff --git a/pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/insta.rkt b/pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/insta.rkt index 192b884e27..59df12dc07 100644 --- a/pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/insta.rkt +++ b/pkgs/web-server-pkgs/web-server-test/tests/web-server/servlet-env/insta.rkt @@ -20,3 +20,5 @@ (body ([bgcolor "white"]) (p "The sum is " ,(number->string (+ (request-number "first") (request-number "second"))))))) + +(module test racket/base) diff --git a/pkgs/web-server-pkgs/web-server-test/tests/web-server/stress/info.rkt b/pkgs/web-server-pkgs/web-server-test/tests/web-server/stress/info.rkt new file mode 100644 index 0000000000..a5b71b1dd7 --- /dev/null +++ b/pkgs/web-server-pkgs/web-server-test/tests/web-server/stress/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-omit-paths 'all) diff --git a/pkgs/web-server-pkgs/web-server-test/tests/web-server/template/info.rkt b/pkgs/web-server-pkgs/web-server-test/tests/web-server/template/info.rkt new file mode 100644 index 0000000000..c18e17042c --- /dev/null +++ b/pkgs/web-server-pkgs/web-server-test/tests/web-server/template/info.rkt @@ -0,0 +1,3 @@ +#lang info + +(define test-omit-paths '("examples")) diff --git a/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/known-module.rkt b/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/known-module.rkt index ae779ba57b..3f44e13c44 100644 --- a/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/known-module.rkt +++ b/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/known-module.rkt @@ -18,6 +18,7 @@ (provide test-known-module) (module+ main (test-known-module)) +(module+ test (test-known-module)) (define (test-known-module) (parameterize ([current-directory (find-collects-dir)]) (test diff --git a/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/main.rkt b/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/main.rkt index f67e9450a1..7043b7dd3a 100644 --- a/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/main.rkt +++ b/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/main.rkt @@ -1,5 +1,8 @@ #lang at-exp racket/base +(module test racket/base + (displayln "run as program for tests")) + (require "xrepl.rkt" "wrapped-output.rkt" "known-module.rkt" tests/eli-tester) (test do (test-wrapped-output) do (test-known-module) diff --git a/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/wrapped-output.rkt b/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/wrapped-output.rkt index d04dcb7744..1ee3d0a7a9 100644 --- a/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/wrapped-output.rkt +++ b/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/wrapped-output.rkt @@ -16,6 +16,7 @@ (provide test-wrapped-output) (module+ main (test-wrapped-output)) +(module+ test (test-wrapped-output)) (define (test-wrapped-output) (define n "\n") (define s string-append) diff --git a/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/xrepl.rkt b/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/xrepl.rkt index f4c83ba010..bf4454d4ee 100644 --- a/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/xrepl.rkt +++ b/pkgs/xrepl-pkgs/xrepl-test/tests/xrepl/xrepl.rkt @@ -7,6 +7,9 @@ ;; sometimes there's very little help, and it might also fail by just getting ;; stuck. +(module test racket/base + (displayln "run as program for tests")) + (define verbose? (make-parameter #f)) (define global-ns (current-namespace)) diff --git a/racket/collects/raco/main.rkt b/racket/collects/raco/main.rkt index fe31bb59b8..ae96ee0765 100644 --- a/racket/collects/raco/main.rkt +++ b/racket/collects/raco/main.rkt @@ -10,6 +10,8 @@ ;; Need to make sure they're here: '#%builtin) + (module test '#%kernel) + (let-values ([(cmdline) (current-command-line-arguments)]) (if (and (positive? (vector-length cmdline)) (equal? "setup" (vector-ref cmdline 0))) diff --git a/racket/collects/raco/raco.rkt b/racket/collects/raco/raco.rkt index c5df39166f..06ca7b18a1 100644 --- a/racket/collects/raco/raco.rkt +++ b/racket/collects/raco/raco.rkt @@ -2,6 +2,8 @@ (require "command-name.rkt" "all-tools.rkt") +(module test racket/base) + (define (find-by-prefix hash str) (let ([trie (make-hash)]) (for ([key (in-hash-keys hash)]) diff --git a/racket/collects/setup/main.rkt b/racket/collects/setup/main.rkt index 0b35c72e3c..a7055f3832 100644 --- a/racket/collects/setup/main.rkt +++ b/racket/collects/setup/main.rkt @@ -17,6 +17,8 @@ ;; Need to make sure they're here: '#%builtin) + (module test '#%kernel) + (when (file-stream-port? (current-output-port)) (file-stream-buffer-mode (current-output-port) 'line)) diff --git a/racket/collects/setup/setup-go.rkt b/racket/collects/setup/setup-go.rkt index 0e9fb6abca..4f30d39c93 100644 --- a/racket/collects/setup/setup-go.rkt +++ b/racket/collects/setup/setup-go.rkt @@ -4,6 +4,8 @@ "setup-core.rkt" compiler/cm) + (module test racket/base) + (define-values (short-name x-flags x-specific-collections x-specific-planet-packages x-archives) (parse-cmdline (current-command-line-arguments))) diff --git a/racket/collects/setup/unixstyle-install.rkt b/racket/collects/setup/unixstyle-install.rkt index 98091adea3..786956f971 100644 --- a/racket/collects/setup/unixstyle-install.rkt +++ b/racket/collects/setup/unixstyle-install.rkt @@ -29,6 +29,8 @@ #lang racket/base +(module test racket/base) + (define args (vector->list (current-command-line-arguments))) (define (get-arg) diff --git a/racket/collects/setup/winstrip.rkt b/racket/collects/setup/winstrip.rkt index 55687afe74..c8edff1666 100644 --- a/racket/collects/setup/winstrip.rkt +++ b/racket/collects/setup/winstrip.rkt @@ -1,6 +1,8 @@ #lang racket/base (require racket/cmdline) +(module test racket/base) + ;; Remove debugging and CGC files (define keep-cgc? #f) diff --git a/racket/collects/setup/winvers.rkt b/racket/collects/setup/winvers.rkt index 5063aa0562..27000d176c 100644 --- a/racket/collects/setup/winvers.rkt +++ b/racket/collects/setup/winvers.rkt @@ -5,6 +5,8 @@ (require racket/file "main-collects.rkt" "dirs.rkt") +(module test racket/base) + (define (make-copy) (let* ([tmpdir (find-system-path 'temp-dir)] [vers (build-path tmpdir "setvers")])