git.iko.soy/elk
on ab53fac help sign in
elk/tests/Main.hs
22 lines 588 B history raw
1module Main where
3import System.Directory
4import System.Exit (exitWith)
5import System.Environment (getArgs)
6import Test.Framework.TestManager
7import Test.Framework.BlackBoxTest
9main :: IO ()
10main = do
11 args <- getArgs
12 tests <- blackBoxTests "tests" "dist/build/elm/elm" ".elm" bbtArgs
13 code <- runTestWithArgs args tests
14 removeDirectoryRecursive "cache"
15 removeDirectoryRecursive "build"
16 exitWith code
18bbtArgs = defaultBBTArgs { bbtArgs_stdoutDiff = ignoreDiff
19 , bbtArgs_stderrDiff = ignoreDiff }
21ignoreDiff :: Diff
22ignoreDiff _ _ = return Nothing