Commit abe42cf2 authored by dterei's avatar dterei

Deal with ugly behaviour of canonicalizePath when file doesn't exist.

parent 6e431967
......@@ -253,7 +253,7 @@ runTest Build{run=Just speed,..} test = do
config <- readConfig $ output </> test </> "config.txt"
let args = words (config "PROG_ARGS") ++ words (config $ map toUpper (show speed) ++ "_OPTS")
stdin <- let s = config "STDIN_FILE" in if s == "" then grab "stdin" else readFile $ test </> s
stats <- IO.canonicalizePath $ output </> test </> "stat.txt"
stats <- fmap (</> "stat.txt") (IO.canonicalizePath $ output </> test)
fmap and $ replicateM times $ do
start <- getCurrentTime
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment