Split up dejafu-tests main

dejafu-tests/dejafu-tests.cabal

@@ -68,8 +68,8 @@ library
   ghc-options:         -Wall
 
 executable dejafu-tests
-  main-is:             Main.hs
-
+  main-is:             MainTest.hs
+  other-modules:       Util
   build-depends:       base
                      , dejafu-tests
                      , tasty

dejafu-tests/exe/MainTest.hs

@@ -0,0 +1,8 @@
+module Main where
+
+import           Test.Tasty (defaultMainWithIngredients)
+
+import           Util
+
+main :: IO ()
+main = defaultMainWithIngredients ingredients tests

dejafu-tests/exe/Util.hs

@@ -1,17 +1,15 @@
-module Main where
+module Util (ingredients, tests) where
 
 import qualified Test.Tasty         as T
 import qualified Test.Tasty.Options as T
+import qualified Test.Tasty.Runners as T
 
 import qualified Examples           as E
 import qualified Integration        as I
 import qualified Unit               as U
 
-main :: IO ()
-main =
-  let ingredients = T.includingOptions options : T.defaultIngredients
-      runner = T.defaultMainWithIngredients ingredients
-  in runner tests
+ingredients :: [T.Ingredient]
+ingredients = T.includingOptions options : T.defaultIngredients
 
 tests :: T.TestTree
 tests = T.testGroup "Tests"