tasty-quickcheck 0.8.3 → 0.8.3.1

raw patch · 3 files changed

+14/−2 lines, 3 files

Files

• CHANGELOG.md +5/−0
• Test/Tasty/QuickCheck.hs +8/−1
• tasty-quickcheck.cabal +1/−1

@@ -1,6 +1,11 @@ Changes ======= +Version 0.8.3.1+---------------++When QC message throws an exception, still print the replay message+ Version 0.8.3 ------------- 

@@ -18,6 +18,7 @@ import Test.Tasty.Providers import Test.Tasty.Options import qualified Test.QuickCheck as QC+import Test.Tasty.Runners (formatMessage) import Test.QuickCheck hiding -- for re-export   ( quickCheck   , Args(..)@@ -118,9 +119,15 @@       args = QC.stdArgs { QC.chatty = False, QC.maxSuccess = nTests, QC.maxSize = maxSize, QC.replay = replay, QC.maxDiscardRatio = maxRatio}     r <- QC.quickCheckWithResult args prop +    qcOutput <- formatMessage $ QC.output r+    let qcOutputNl =+          if "\n" `isSuffixOf` qcOutput+            then qcOutput+            else qcOutput ++ "\n"+     return $       (if successful r then testPassed else testFailed)-      (QC.output r +++      (qcOutputNl ++         (if showReplay then reproduceMsg r else ""))  successful :: QC.Result -> Bool

@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/  name:                tasty-quickcheck-version:             0.8.3+version:             0.8.3.1 synopsis:            QuickCheck support for the Tasty test framework. description:         QuickCheck support for the Tasty test framework. license:             MIT