From 407d9b5f0792ff94438a7e5f5448f54dddb8f7d9 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Fri, 10 Dec 2010 13:44:16 -0500 Subject: [PATCH] Error when running TR's test harness with no tests. --- collects/tests/typed-scheme/run.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/collects/tests/typed-scheme/run.rkt b/collects/tests/typed-scheme/run.rkt index 8b83e03936..7981d6bc33 100644 --- a/collects/tests/typed-scheme/run.rkt +++ b/collects/tests/typed-scheme/run.rkt @@ -30,7 +30,8 @@ (cond [(and (unit?) (int?)) tests] [(unit?) unit-tests] [(int?) int-tests] - [else #f])) + [else + (error "You must specify which tests should be run. See --help for more info.\n")])) (cond [(and (nightly?) (eq? 'cgc (system-type 'gc))) (printf "Skipping Typed Racket tests.\n")]