summaryrefslogtreecommitdiff
path: root/Test.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Test.hs')
-rw-r--r--Test.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/Test.hs b/Test.hs
index 73fd3c003..0d8e0e3ef 100644
--- a/Test.hs
+++ b/Test.hs
@@ -13,6 +13,7 @@ import Test.Tasty
import Test.Tasty.Runners
import Test.Tasty.HUnit
import Test.Tasty.QuickCheck
+import Test.Tasty.Ingredients.Rerun
import Data.Monoid
import Options.Applicative hiding (command)
@@ -106,7 +107,7 @@ main ps = do
ingredients :: [Ingredient]
ingredients =
- [ consoleTestReporter
+ [ rerunningTests [consoleTestReporter]
, listingTests
]
@@ -1269,7 +1270,7 @@ withTestEnv forcedirect = withResource prepare release
where
prepare = do
env <- prepareTestEnv forcedirect
- case tryIngredients ingredients mempty (initTests env) of
+ case tryIngredients [consoleTestReporter] mempty (initTests env) of
Nothing -> error "No tests found!?"
Just act -> unlessM act $
error "init tests failed! cannot continue"