tasty-silver 3.1.12 → 3.1.13
raw patch · 3 files changed
+21/−2 lines, 3 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Test.Tasty.Silver.Interactive: instance GHC.Exception.Exception Test.Tasty.Silver.Interactive.FancyTestException
+ Test.Tasty.Silver.Interactive: instance GHC.Exception.Type.Exception Test.Tasty.Silver.Interactive.FancyTestException
+ Test.Tasty.Silver.Interactive: instance Test.Tasty.Options.IsOption Test.Tasty.Silver.Interactive.AnsiTricks
- Test.Tasty.Silver.Advanced: DiffText :: (Maybe String) -> Text -> Text -> GDiff
+ Test.Tasty.Silver.Advanced: DiffText :: Maybe String -> Text -> Text -> GDiff
- Test.Tasty.Silver.Advanced: ShowDiffed :: (Maybe String) -> Text -> GDiff
+ Test.Tasty.Silver.Advanced: ShowDiffed :: Maybe String -> Text -> GDiff
- Test.Tasty.Silver.Advanced: [gReason] :: GDiff -> (Maybe String)
+ Test.Tasty.Silver.Advanced: [gReason] :: GDiff -> Maybe String
- Test.Tasty.Silver.Advanced: goldenTest :: TestName -> (IO a) -> (IO a) -> (a -> a -> IO (Maybe String)) -> (a -> IO ()) -> TestTree
+ Test.Tasty.Silver.Advanced: goldenTest :: TestName -> IO a -> IO a -> (a -> a -> IO (Maybe String)) -> (a -> IO ()) -> TestTree
- Test.Tasty.Silver.Advanced: goldenTest1 :: TestName -> (IO (Maybe a)) -> (IO a) -> (a -> a -> GDiff) -> (a -> GShow) -> (a -> IO ()) -> TestTree
+ Test.Tasty.Silver.Advanced: goldenTest1 :: TestName -> IO (Maybe a) -> IO a -> (a -> a -> GDiff) -> (a -> GShow) -> (a -> IO ()) -> TestTree
- Test.Tasty.Silver.Advanced: goldenTestIO :: TestName -> (IO (Maybe a)) -> (IO a) -> (a -> a -> IO GDiff) -> (a -> IO GShow) -> (a -> IO ()) -> TestTree
+ Test.Tasty.Silver.Advanced: goldenTestIO :: TestName -> IO (Maybe a) -> IO a -> (a -> a -> IO GDiff) -> (a -> IO GShow) -> (a -> IO ()) -> TestTree
- Test.Tasty.Silver.Advanced: goldenTestIO1 :: TestName -> (IO (Maybe a)) -> (IO a) -> (a -> a -> IO GDiff) -> (a -> IO GShow) -> (Maybe (a -> IO ())) -> TestTree
+ Test.Tasty.Silver.Advanced: goldenTestIO1 :: TestName -> IO (Maybe a) -> IO a -> (a -> a -> IO GDiff) -> (a -> IO GShow) -> Maybe (a -> IO ()) -> TestTree
- Test.Tasty.Silver.Interactive: defaultMain1 :: ([RegexFilter]) -> TestTree -> IO ()
+ Test.Tasty.Silver.Interactive: defaultMain1 :: [RegexFilter] -> TestTree -> IO ()
- Test.Tasty.Silver.Internal: DiffText :: (Maybe String) -> Text -> Text -> GDiff
+ Test.Tasty.Silver.Internal: DiffText :: Maybe String -> Text -> Text -> GDiff
- Test.Tasty.Silver.Internal: GRDifferent :: (a) -> (a) -> (GDiff) -> (Maybe (a -> IO ())) -> GoldenResult' m
+ Test.Tasty.Silver.Internal: GRDifferent :: a -> a -> GDiff -> Maybe (a -> IO ()) -> GoldenResult' m
- Test.Tasty.Silver.Internal: GRNoGolden :: (m a) -> (a -> IO GShow) -> (Maybe (a -> IO ())) -> GoldenResult' m
+ Test.Tasty.Silver.Internal: GRNoGolden :: m a -> (a -> IO GShow) -> Maybe (a -> IO ()) -> GoldenResult' m
- Test.Tasty.Silver.Internal: Golden :: (IO (Maybe a)) -> (IO a) -> (a -> a -> IO GDiff) -> (a -> IO GShow) -> (Maybe (a -> IO ())) -> Golden
+ Test.Tasty.Silver.Internal: Golden :: IO (Maybe a) -> IO a -> (a -> a -> IO GDiff) -> (a -> IO GShow) -> Maybe (a -> IO ()) -> Golden
- Test.Tasty.Silver.Internal: ShowDiffed :: (Maybe String) -> Text -> GDiff
+ Test.Tasty.Silver.Internal: ShowDiffed :: Maybe String -> Text -> GDiff
- Test.Tasty.Silver.Internal: [gReason] :: GDiff -> (Maybe String)
+ Test.Tasty.Silver.Internal: [gReason] :: GDiff -> Maybe String
Files
- CHANGELOG.md +5/−0
- Test/Tasty/Silver/Interactive.hs +15/−1
- tasty-silver.cabal +1/−1
CHANGELOG.md view
@@ -1,6 +1,11 @@ Changes ======= +Version 3.1.13+--------------++* Add option to disable ansi tricks (#18, thanks to L-TChen)+ Version 3.1.12 --------------
Test/Tasty/Silver/Interactive.hs view
@@ -107,6 +107,7 @@ interactiveTests dis = TestManager [ Option (Proxy :: Proxy Interactive) , Option (Proxy :: Proxy HideSuccesses)+ , Option (Proxy :: Proxy AnsiTricks) , Option (Proxy :: Proxy UseColor) , Option (Proxy :: Proxy NumThreads) , Option (Proxy :: Proxy ExcludeFilters)@@ -151,6 +152,7 @@ let whenColor = lookupOption opts HideSuccesses hideSuccesses = lookupOption opts+ AnsiTricks ansiTricks = lookupOption opts let ?colors = useColor whenColor isTerm@@ -159,7 +161,7 @@ outp = produceOutput opts tests stats <- case () of { _- | hideSuccesses && isTerm ->+ | hideSuccesses && isTerm && ansiTricks -> consoleOutputHidingSuccesses outp smap | hideSuccesses && not isTerm -> streamOutputHidingSuccesses outp smap@@ -633,6 +635,18 @@ optionName = return "hide-successes" optionHelp = return "Do not print tests that passed successfully" optionCLParser = flagCLParser Nothing (HideSuccesses True)++newtype AnsiTricks = AnsiTricks Bool+ deriving Typeable++instance IsOption AnsiTricks where+ defaultValue = AnsiTricks True+ parseValue = fmap AnsiTricks . safeReadBool+ optionName = return "ansi-tricks"+ optionHelp = return $+ -- Multiline literals don't work because of -XCPP.+ "Enable various ANSI terminal tricks. " +++ "Can be set to 'true' (default) or 'false'." -- | When to use color on the output data UseColor
tasty-silver.cabal view
@@ -1,5 +1,5 @@ name: tasty-silver-version: 3.1.12+version: 3.1.13 synopsis: A fancy test runner, including support for golden tests. description: This package provides a fancy test runner and support for «golden testing».