From abcbce129bf65fc63daa33d843589305efd94b81 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Wed, 6 Oct 2010 11:11:47 -0400 Subject: [PATCH] Changed the optimizer's test harness for optimization on by default. --- 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 ebff770939..877871757b 100644 --- a/collects/tests/typed-scheme/optimizer/run.rkt +++ b/collects/tests/typed-scheme/optimizer/run.rkt @@ -29,7 +29,7 @@ [m (or (regexp-match-positions prog-rx prog) (error 'evaluator "bad program contents in ~e" file))] [prog (string-append (substring prog (caadr m) (cdadr m)) - (if optimize? "\n#:optimize\n" "\n") + (if (not optimize?) "\n#:no-optimize\n" "\n") (substring prog (cdar m)))] [evaluator (make-module-evaluator prog)] [out (get-output evaluator)])