summaryrefslogtreecommitdiff
path: root/Test.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-01-24 12:21:30 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-01-24 12:21:30 -0400
commit852f1f6cea85a7c781c8286f459023bdacebe021 (patch)
treedbeb0ad578c887343843fd9aa5853226863edf85 /Test.hs
parentf2cdb5242d9a7f72f96656608cf3ee664748c68b (diff)
tasty-rerun! make rerest runs much much faster than running whole test suite
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 d38efea04..a6cec1aca 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"