@@ -40,11 +40,11 @@ testIf handler filePaths =
4040 where
4141 setupTest filePath = do
4242 let args = [ "--make", "--src-dir=" ++ testsDir, filePath ]
43− (exitCode, _stdout, stderr) <- readProcessWithExitCode compiler args ""
44− return (testCase filePath (handler exitCode stderr))
43+ (exitCode, stdout, stderr) <- readProcessWithExitCode compiler args ""
44+ return (testCase filePath (handler exitCode (stdout ++ stderr)))
4545
4646compiler :: FilePath
47−compiler = "dist" </> "build" </> "Elm" </> "elm"
47+compiler = "dist" </> "build" </> "elm" </> "elm"
4848
4949
5050-- CHECK RESULTS