@@ -40,11 +40,11 @@ testIf handler filePaths =
41 setupTest filePath = do
41 setupTest filePath = do
42 let args = [ "--make", "--src-dir=" ++ testsDir, filePath ]
42 let args = [ "--make", "--src-dir=" ++ testsDir, filePath ]
43− (exitCode, _stdout, stderr) <- readProcessWithExitCode compiler args ""
43+ (exitCode, stdout, stderr) <- readProcessWithExitCode compiler args ""
44− return (testCase filePath (handler exitCode stderr))
44+ return (testCase filePath (handler exitCode (stdout ++ stderr)))
46compiler :: FilePath
46compiler :: FilePath
47−compiler = "dist" </> "build" </> "Elm" </> "elm"
47+compiler = "dist" </> "build" </> "elm" </> "elm"
50-- CHECK RESULTS
50-- CHECK RESULTS