sync test configuration for non-".rkt" files

This commit is contained in:
Matthew Flatt 2013-12-30 09:50:30 -07:00
parent 58d425c00c
commit 43d3479786
10 changed files with 47 additions and 29 deletions

View File

@ -8,7 +8,7 @@
(define tool-names '("DeinProgramm"))
(define tool-urls '("http://www.deinprogramm.de/dmda/"))
(define compile-omit-files
(define compile-omit-paths
'("define-record-procedures.scm"
"convert-explicit.scm"
"line3d.scm"))

View File

@ -1,7 +1,7 @@
(module info info
(define name "DeinProgramm - QuickCheck")
(define compile-omit-files
(define compile-omit-paths
'("examples.scm"
"packages.scm"
"quickcheck-test.scm"

View File

@ -1,3 +1,11 @@
#lang info
(define test-skip-paths '("balle-grav-frot.ss"))
(define test-command-line-arguments
'(("dessine-arbre.ss" ())
("foo.ss" ())
("jeu-du-chaos.ss" ())
("mon-script.ss" ())
("streams.ss" ())
("valrose.ss" ())))

View File

@ -34,7 +34,13 @@
(jeu-du-chaos)
;; For automatic testing, check that we can at least start,
;; but exit soon after:
(module+ test
(require racket/gui/base)
(void
(thread
(lambda ()
(sleep 1)
(queue-callback (lambda () (exit)) #f)))))

View File

@ -53,3 +53,9 @@ If you have code written for @(plot-name) 5.1.3 or earlier, please see @secref["
@include-section["compat.scrbl"]
@close-plot-eval[]
@; Needs a timeout for testing:
@(module* test racket/base
(require (submod ".."))
(module config info
(define timeout 180)))

View File

@ -685,11 +685,6 @@ path/s is either such a string or a list of them.
"pkgs/datalog" responsible (jay)
"pkgs/db-pkgs" responsible (ryanc)
"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/distributed-places-pkgs" responsible (tewk)
"pkgs/distro-build" responsible (mflatt)
"pkgs/draw-pkgs" responsible (mflatt)
@ -715,14 +710,6 @@ path/s is either such a string or a list of them.
"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" *)
"pkgs/drracket-pkgs/drracket-test/tests/jpr/foo.ss" drdr:command-line (mzc "-k" *)
"pkgs/drracket-pkgs/drracket-test/tests/jpr/jeu-du-chaos.ss" drdr:command-line (mzc "-k" *)
"pkgs/drracket-pkgs/drracket-test/tests/jpr/mon-script.ss" drdr:command-line (mzc "-k" *)
"pkgs/drracket-pkgs/drracket-test/tests/jpr/monte-carlo.ss" drdr:command-line (mzc "-k" *)
"pkgs/drracket-pkgs/drracket-test/tests/jpr/streams.ss" drdr:command-line (mzc "-k" *)
"pkgs/drracket-pkgs/drracket-test/tests/jpr/valrose.ss" drdr:command-line (mzc "-k" *)
"pkgs/ds-store-pkgs" responsible (mflatt)
"pkgs/eli-tester" responsible (eli)
"pkgs/eopl" responsible (dvanhorn)
@ -762,7 +749,6 @@ path/s is either such a string or a list of them.
"pkgs/htdp-pkgs/htdp-lib/graphics/tests/sixlib.rktl" drdr:command-line #f
"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/test-engine" responsible (kathyg)
"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)
@ -858,7 +844,6 @@ path/s is either such a string or a list of them.
"pkgs/plt-services/meta" responsible (eli)
"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/props" responsible (eli jay) drdr:command-line (racket "-um" * "verify")
"pkgs/preprocessor" responsible (eli)
@ -1138,16 +1123,8 @@ path/s is either such a string or a list of them.
"pkgs/shell-completion/racket-completion.zsh" responsible (eli)
"pkgs/slatex" responsible (sstrickl)
"pkgs/slideshow-pkgs" responsible (mflatt robby)
"pkgs/slideshow-pkgs/slideshow-exe/slideshow/examples/interlocking-components.scm" 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
"pkgs/srfi-pkgs/srfi-lib/srfi/25/ix-ctor.scm" drdr:command-line #f
"pkgs/srfi-pkgs/srfi-lib/srfi/25/op-ctor.scm" drdr:command-line #f
"pkgs/srfi-pkgs/srfi-lib/srfi/67/compare-reference.scm" drdr:command-line #f
"pkgs/srfi-pkgs/srfi-lib/srfi/74/blob.scm" drdr:command-line #f
"pkgs/srfi-pkgs/srfi-lib/srfi/78/check-reference.scm" drdr:command-line #f
"pkgs/srfi-pkgs/srfi-lib/srfi/78/examples-78.scm" drdr:command-line #f
"pkgs/string-constants-pkgs" responsible (robby)
"pkgs/swindle" responsible (eli)
"pkgs/syntax-color-pkgs" responsible (mflatt)

View File

@ -0,0 +1,3 @@
#lang info
(define test-command-line-arguments '(("run.sps" ())))

View File

@ -24,3 +24,9 @@ and the @tt{examples} subdirectory in the @tt{redex} collection.
@index-section[]
@; Needs a timeout for testing:
@(module* test racket/base
(require (submod ".."))
(module config info
(define timeout 300)))

View File

@ -1125,3 +1125,10 @@ is rendered as @racketblock[Γ ⊢ e : t]
@close-eval[amb-eval]
@; Needs a timeout for testing:
@(module* test racket/base
(require (submod ".."))
(module config info
(define timeout 300)))

View File

@ -2,3 +2,8 @@
(define test-omit-paths '("fail"
"xfail"))
(define test-command-line-arguments
'(("succeed/priority-queue.scm" ())
("succeed/hw01.scm" ())
("succeed/foo.scm" ())
("succeed/batched-queue.scm" ())))