@@ -4,6 +4,12 @@ import Test.Framework
4import Test.Framework.BlackBoxTest
4import Test.Framework.BlackBoxTest
6main :: IO ()
6main :: IO ()
8+ tests <- blackBoxTests "tests/good" "dist/build/elm/elm" ".elm" args
7−main = htfMain tests
9+ htfMain tests
9−tests = blackBoxTests "tests/good" "dist/build/elm/elm" ".elm" defaultBBTArgs
11+args = defaultBBTArgs { bbtArgs_stdoutDiff = ignoreDiff
12+ , bbtArgs_stderrDiff = ignoreDiff }
15+ignoreDiff _ _ = return Nothing