From d60793d2713d90ef712e5d83e092c92e4632dd56 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Tue, 12 Oct 2010 15:56:00 -0400 Subject: [PATCH] Changed the interface for running single optimizer tests. original commit: f3ae9c73b0f58d2d56e2ee3cee605c58a9bb3a1d --- collects/tests/typed-scheme/optimizer/run.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/tests/typed-scheme/optimizer/run.rkt b/collects/tests/typed-scheme/optimizer/run.rkt index 87787175..9dfe94d0 100644 --- a/collects/tests/typed-scheme/optimizer/run.rkt +++ b/collects/tests/typed-scheme/optimizer/run.rkt @@ -84,7 +84,7 @@ (let ((n-failures (if to-run - (if (test (format "tests/~a.rkt" to-run)) 0 1) + (if (test to-run) 0 1) (for/fold ((n-failures 0)) ((gen (in-directory tests-dir))) (+ n-failures (if (test gen) 0 1))))))