Hello community,

here is the log from the commit of package ghc-hspec-core for openSUSE:Factory 
checked in at 2017-08-31 20:47:45
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-hspec-core (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-hspec-core.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-hspec-core"

Thu Aug 31 20:47:45 2017 rev:5 rq:513391 version:2.4.4

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-hspec-core/ghc-hspec-core.changes    
2017-06-22 10:37:52.502922147 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-hspec-core.new/ghc-hspec-core.changes       
2017-08-31 20:47:46.928563976 +0200
@@ -1,0 +2,5 @@
+Thu Jul 27 14:06:42 UTC 2017 - [email protected]
+
+- Update to version 2.4.4.
+
+-------------------------------------------------------------------

Old:
----
  hspec-core-2.4.3.tar.gz
  hspec-core.cabal

New:
----
  hspec-core-2.4.4.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ ghc-hspec-core.spec ++++++
--- /var/tmp/diff_new_pack.o8gyl4/_old  2017-08-31 20:47:48.092400613 +0200
+++ /var/tmp/diff_new_pack.o8gyl4/_new  2017-08-31 20:47:48.104398929 +0200
@@ -19,14 +19,13 @@
 %global pkg_name hspec-core
 %bcond_with tests
 Name:           ghc-%{pkg_name}
-Version:        2.4.3
+Version:        2.4.4
 Release:        0
 Summary:        A Testing Framework for Haskell
 License:        MIT
 Group:          Development/Languages/Other
 Url:            https://hackage.haskell.org/package/%{pkg_name}
 Source0:        
https://hackage.haskell.org/package/%{pkg_name}-%{version}/%{pkg_name}-%{version}.tar.gz
-Source1:        
https://hackage.haskell.org/package/%{pkg_name}-%{version}/revision/1.cabal#/%{pkg_name}.cabal
 BuildRequires:  ghc-Cabal-devel
 BuildRequires:  ghc-HUnit-devel
 BuildRequires:  ghc-QuickCheck-devel
@@ -70,7 +69,6 @@
 
 %prep
 %setup -q -n %{pkg_name}-%{version}
-cp -p %{SOURCE1} %{pkg_name}.cabal
 
 %build
 %ghc_lib_build

++++++ hspec-core-2.4.3.tar.gz -> hspec-core-2.4.4.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/hspec-core-2.4.3/hspec-core.cabal 
new/hspec-core-2.4.4/hspec-core.cabal
--- old/hspec-core-2.4.3/hspec-core.cabal       2017-03-25 12:27:37.000000000 
+0100
+++ new/hspec-core-2.4.4/hspec-core.cabal       2017-06-16 11:08:23.000000000 
+0200
@@ -1,9 +1,9 @@
--- This file has been generated from package.yaml by hpack version 0.17.0.
+-- This file has been generated from package.yaml by hpack version 0.18.0.
 --
 -- see: https://github.com/sol/hpack
 
 name:             hspec-core
-version:          2.4.3
+version:          2.4.4
 license:          MIT
 license-file:     LICENSE
 copyright:        (c) 2011-2017 Simon Hengel,
@@ -40,7 +40,7 @@
     , deepseq
     , HUnit >= 1.2.5
     , QuickCheck >= 2.5.1
-    , quickcheck-io
+    , quickcheck-io >= 0.2.0
     , hspec-expectations == 0.8.2.*
     , async >= 2
     , call-stack
@@ -93,7 +93,7 @@
     , deepseq
     , HUnit >= 1.2.5
     , QuickCheck >= 2.5.1
-    , quickcheck-io
+    , quickcheck-io >= 0.2.0
     , hspec-expectations == 0.8.2.*
     , async >= 2
     , call-stack
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/hspec-core-2.4.3/src/Test/Hspec/Core/Example.hs 
new/hspec-core-2.4.4/src/Test/Hspec/Core/Example.hs
--- old/hspec-core-2.4.3/src/Test/Hspec/Core/Example.hs 2017-03-25 
12:27:37.000000000 +0100
+++ new/hspec-core-2.4.4/src/Test/Hspec/Core/Example.hs 2017-06-16 
11:08:23.000000000 +0200
@@ -185,10 +185,12 @@
       sanitizeFailureMessage r = let m = QC.output r in strip $
 #if MIN_VERSION_QuickCheck(2,7,0)
         case QC.theException r of
-          Just e -> let numbers = formatNumbers r in
-            "uncaught exception: " ++ formatException e ++ " " ++ numbers ++ 
"\n" ++ case lines m of
-              x:xs | x == (exceptionPrefix ++ show e ++ "' " ++ numbers ++ ": 
") -> unlines xs
-              _ -> m
+          Just e -> case E.fromException e :: Maybe (HUnit.HUnitFailure) of
+            Just _ -> (addFalsifiable . stripFailed) m
+            Nothing -> let numbers = formatNumbers r in
+              "uncaught exception: " ++ formatException e ++ " " ++ numbers ++ 
"\n" ++ case lines m of
+                x:xs | x == (exceptionPrefix ++ show e ++ "' " ++ numbers ++ 
": ") -> unlines xs
+                _ -> m
           Nothing ->
 #endif
             (addFalsifiable . stripFailed) m


Reply via email to