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