Hello community, here is the log from the commit of package ghc-hspec-core for openSUSE:Factory checked in at 2019-04-03 09:27:25 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-hspec-core (Old) and /work/SRC/openSUSE:Factory/.ghc-hspec-core.new.25356 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-hspec-core" Wed Apr 3 09:27:25 2019 rev:12 rq:690182 version:2.7.1 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-hspec-core/ghc-hspec-core.changes 2019-01-25 22:43:20.563229871 +0100 +++ /work/SRC/openSUSE:Factory/.ghc-hspec-core.new.25356/ghc-hspec-core.changes 2019-04-03 09:27:26.311798945 +0200 @@ -1,0 +2,6 @@ +Sat Mar 30 03:03:29 UTC 2019 - [email protected] + +- Update hspec-core to version 2.7.1. + Upstream does not provide a change log file. + +------------------------------------------------------------------- Old: ---- hspec-core-2.7.0.tar.gz New: ---- hspec-core-2.7.1.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-hspec-core.spec ++++++ --- /var/tmp/diff_new_pack.ckSNPU/_old 2019-04-03 09:27:27.255799390 +0200 +++ /var/tmp/diff_new_pack.ckSNPU/_new 2019-04-03 09:27:27.259799392 +0200 @@ -19,7 +19,7 @@ %global pkg_name hspec-core %bcond_with tests Name: ghc-%{pkg_name} -Version: 2.7.0 +Version: 2.7.1 Release: 0 Summary: A Testing Framework for Haskell License: MIT ++++++ hspec-core-2.7.0.tar.gz -> hspec-core-2.7.1.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/hspec-core-2.7.0/hspec-core.cabal new/hspec-core-2.7.1/hspec-core.cabal --- old/hspec-core-2.7.0/hspec-core.cabal 2019-01-17 15:23:45.000000000 +0100 +++ new/hspec-core-2.7.1/hspec-core.cabal 2019-03-29 13:56:43.000000000 +0100 @@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack -- --- hash: 39dc148675f73276544e876331589928821112ae13bb688991d3c5c5ee686cee +-- hash: 82bf612e65db816a15de01c4c432597ef4492ceeb81f46063dcdd57b74ec523a name: hspec-core -version: 2.7.0 +version: 2.7.1 license: MIT license-file: LICENSE copyright: (c) 2011-2019 Simon Hengel, @@ -34,7 +34,7 @@ ghc-options: -Wall build-depends: HUnit ==1.6.* - , QuickCheck ==2.12.* + , QuickCheck >=2.13.1 , ansi-terminal >=0.5 , array , base >=4.5.0.0 && <5 @@ -92,7 +92,7 @@ cpp-options: -DTEST build-depends: HUnit ==1.6.* - , QuickCheck ==2.12.* + , QuickCheck >=2.13.1 , ansi-terminal >=0.5 , array , base >=4.5.0.0 && <5 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/hspec-core-2.7.0/test/Test/Hspec/Core/ExampleSpec.hs new/hspec-core-2.7.1/test/Test/Hspec/Core/ExampleSpec.hs --- old/hspec-core-2.7.0/test/Test/Hspec/Core/ExampleSpec.hs 2019-01-17 15:23:45.000000000 +0100 +++ new/hspec-core-2.7.1/test/Test/Hspec/Core/ExampleSpec.hs 2019-03-29 13:56:43.000000000 +0100 @@ -145,7 +145,7 @@ it "shows what falsified it" $ do Result "" (Failure _ r) <- evaluateExample $ property $ \ (x :: Int) (y :: Int) -> (x == 0 && y == 1) ==> False r `shouldBe` (Reason . intercalate "\n") [ - "Falsifiable (after 1 test):" + "Falsified (after 1 test):" , " 0" , " 1" ] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/hspec-core-2.7.0/test/Test/Hspec/Core/QuickCheckUtilSpec.hs new/hspec-core-2.7.1/test/Test/Hspec/Core/QuickCheckUtilSpec.hs --- old/hspec-core-2.7.0/test/Test/Hspec/Core/QuickCheckUtilSpec.hs 2019-01-17 15:23:45.000000000 +0100 +++ new/hspec-core-2.7.1/test/Test/Hspec/Core/QuickCheckUtilSpec.hs 2019-03-29 13:56:43.000000000 +0100 @@ -91,7 +91,7 @@ , "0" , "" , "Passed:" - , "-39" + , "28" ] parseQuickCheckResult <$> quickCheckWithResult args {maxSuccess = 2} (verbose p) `shouldReturn` QuickCheckResult 2 info (QuickCheckOtherFailure "Passed 2 tests (expected failure).") @@ -113,7 +113,7 @@ , "0" , "" , "Passed:" - , "-39" + , "28" , "" , "+++ OK, passed 2 tests." , "" @@ -133,29 +133,29 @@ , quickCheckFailureException = Nothing , quickCheckFailureReason = "Insufficient coverage" , quickCheckFailureCounterexample = [ - " 1.0% is 23" + " 0.8% is 23" , "" - , "Only 1.0% is 23, but expected 10.0%" + , "Only 0.8% is 23, but expected 10.0%" ] } it "parses result" $ do parseQuickCheckResult <$> qc p `shouldReturn` - QuickCheckResult 800 "" (QuickCheckFailure failure) + QuickCheckResult 400 "" (QuickCheckFailure failure) it "includes verbose output" $ do - let info = intercalate "\n\n" (replicate 799 "Passed:") + let info = intercalate "\n\n" (replicate 399 "Passed:") parseQuickCheckResult <$> qc (verbose . p) `shouldReturn` - QuickCheckResult 800 info (QuickCheckFailure failure) + QuickCheckResult 400 info (QuickCheckFailure failure) context "with Failure" $ do context "with single-line failure reason" $ do let p :: Int -> Bool - p = (/= 1) + p = (< 1) - err = "Falsifiable" - result = QuickCheckResult 2 "" (QuickCheckFailure $ QCFailure 0 Nothing err ["1"]) + err = "Falsified" + result = QuickCheckResult 3 "" (QuickCheckFailure $ QCFailure 1 Nothing err ["1"]) it "parses result" $ do parseQuickCheckResult <$> qc p `shouldReturn` result @@ -165,6 +165,15 @@ "Passed:" , "0" , "" + , "Passed:" + , "-1" + , "" + , "Failed:" + , "2" + , "" + , "Passed:" + , "0" + , "" , "Failed:" , "1" , "" @@ -177,10 +186,10 @@ context "with multi-line failure reason" $ do let p :: Int -> QCP.Result - p n = if n /= 1 then QCP.succeeded else QCP.failed {QCP.reason = err} + p n = if n /= 2 then QCP.succeeded else QCP.failed {QCP.reason = err} err = "foo\nbar" - result = QuickCheckResult 2 "" (QuickCheckFailure $ QCFailure 0 Nothing err ["1"]) + result = QuickCheckResult 3 "" (QuickCheckFailure $ QCFailure 0 Nothing err ["2"]) it "parses result" $ do parseQuickCheckResult <$> qc p `shouldReturn` result @@ -190,11 +199,17 @@ "Passed:" , "0" , "" + , "Passed:" + , "-1" + , "" , "Failed:" - , "1" + , "2" , "" , "Passed:" , "0" + , "" + , "Passed:" + , "1" ] parseQuickCheckResult <$> qc (verbose p) `shouldReturn` result {quickCheckResultInfo = info}
