summaryrefslogtreecommitdiff
path: root/Types/Test.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2016-01-06 13:44:12 -0400
committerJoey Hess <joeyh@joeyh.name>2016-01-06 13:44:12 -0400
commitd667a68b7ebb07be166250922bd7780cd1950521 (patch)
tree22830c83a19116e99a40208a271b5d80b473492f /Types/Test.hs
parentb96cfdc094cc1654bff8f6730ac7de6b9184aa26 (diff)
test: Added --keep-failures option.
Diffstat (limited to 'Types/Test.hs')
-rw-r--r--Types/Test.hs9
1 files changed, 8 insertions, 1 deletions
diff --git a/Types/Test.hs b/Types/Test.hs
index 35c4c3c235..2cf8dfbe2d 100644
--- a/Types/Test.hs
+++ b/Types/Test.hs
@@ -14,7 +14,14 @@ import Test.Tasty.Options
#endif
#ifdef WITH_TESTSUITE
-type TestOptions = OptionSet
+data TestOptions = TestOptions
+ { tastyOptionSet :: OptionSet
+ , keepFailuresOption :: Bool
+ }
+
+instance Monoid TestOptions where
+ mempty = TestOptions mempty False
+
#else
type TestOptions = ()
#endif