From a89972183adba7314aa39ffc3356f08ccc5b65c4 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Thu, 16 Feb 2012 11:36:21 -0500 Subject: [PATCH] Clean up compiled test files to force recompiling. original commit: aa856924367bb7839f7522258d9b119215c53987 --- .../optimizer/missed-optimizations/multi-file2.rkt | 5 +++-- collects/tests/typed-racket/optimizer/run.rkt | 4 +++- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/collects/tests/typed-racket/optimizer/missed-optimizations/multi-file2.rkt b/collects/tests/typed-racket/optimizer/missed-optimizations/multi-file2.rkt index 7daf58fb..637b2d20 100644 --- a/collects/tests/typed-racket/optimizer/missed-optimizations/multi-file2.rkt +++ b/collects/tests/typed-racket/optimizer/missed-optimizations/multi-file2.rkt @@ -1,7 +1,8 @@ #; ( -TR opt: multi-file2.rkt 12:10 (+ 3 5) -- fixnum bounded expr -TR opt: multi-file2.rkt 12:3 (* 3.4 (+ 3 5)) -- binary float +TR missed opt: multi-file1.rkt 12:2 (* x (ann 3 Integer)) -- all args float-arg-expr, result not Float -- caused by: 12:12 3 +TR opt: multi-file2.rkt 13:10 (+ 3 5) -- fixnum bounded expr +TR opt: multi-file2.rkt 13:3 (* 3.4 (+ 3 5)) -- binary float 81.6 ) diff --git a/collects/tests/typed-racket/optimizer/run.rkt b/collects/tests/typed-racket/optimizer/run.rkt index c2723d62..35e2db90 100644 --- a/collects/tests/typed-racket/optimizer/run.rkt +++ b/collects/tests/typed-racket/optimizer/run.rkt @@ -21,7 +21,9 @@ (parameterize ([current-namespace (make-base-empty-namespace)] [current-load-relative-directory dir]) - (dynamic-require f #f))))) + (dynamic-require f #f)) + ;; clean up compiled files in prevision of the next testing run + (delete-directory/files (build-path dir "compiled"))))) ;; we log optimizations and compare to an expected log to make sure that all ;; the optimizations we expected did indeed happen