diff --git a/collects/compiler/commands/test.rkt b/collects/compiler/commands/test.rkt index d0d6c33df6..082b028536 100644 --- a/collects/compiler/commands/test.rkt +++ b/collects/compiler/commands/test.rkt @@ -5,7 +5,7 @@ raco/command-name) (define submodule 'test) -(define run-anyways? #f) +(define run-anyways? #t) (define (do-test e [check-suffix? #f]) (match e @@ -37,7 +37,10 @@ "Runs submodule (defaults to `test')" (set! submodule (string->symbol name))] [("--run-if-absent" "-r") - "Require base module if submodule is absent" + "Require module if submodule is absent (on by default)" (set! run-anyways? #t)] + [("--no-run-if-absent" "-x") + "Require nothing if submodule is absent" + (set! run-anyways? #f)] #:args file-or-directory (for-each do-test file-or-directory))