aboutsummaryrefslogtreecommitdiff
path: root/Types
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-01-06 13:44:12 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-01-06 13:44:12 -0400
commit82a27da0157ce3fc78ab917b6d9d26486ed7bb8c (patch)
tree9d9de1506ffb0aa91a16cb28866d4806ab37bec5 /Types
parentf906cddf91577c53600a60e4cfbfa3c1fe25d1ab (diff)
test: Added --keep-failures option.
Diffstat (limited to 'Types')
-rw-r--r--Types/Test.hs9
1 files changed, 8 insertions, 1 deletions
diff --git a/Types/Test.hs b/Types/Test.hs
index 35c4c3c23..2cf8dfbe2 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