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)])