From 77a543e7b7233c477b7ad6841bcdc5b2c80bbd21 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Fri, 5 Dec 2008 09:01:42 +0000 Subject: [PATCH] benchresults instead of summary for bench results filename --- tools/bench.hs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/tools/bench.hs b/tools/bench.hs index f656b56c9..6206adede 100644 --- a/tools/bench.hs +++ b/tools/bench.hs @@ -104,12 +104,10 @@ time cmd = do return $ realToFrac $ diffUTCTime t2 t1 summarise tests exes results = do - -- putStrLn ""; print results putStrLn "\nSummary (best iteration):\n" let t = maketable tests exes results putStrLn $ TA.render id t - -- putStrLn $ "See " ++ prefix ++ "summary.*" - let outname = "summary" + let outname = "benchresults" writeFile (outname <.> "txt") $ TA.render id t writeFile (outname <.> "html") $ renderHtml $ TH.css TH.defaultCss +++ TH.render id t