Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package ghc-data-fix for openSUSE:Factory checked in at 2024-07-22 17:16:16 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-data-fix (Old) and /work/SRC/openSUSE:Factory/.ghc-data-fix.new.17339 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-data-fix" Mon Jul 22 17:16:16 2024 rev:13 rq:1188635 version:0.3.4 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-data-fix/ghc-data-fix.changes 2024-05-20 18:17:09.810426231 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-data-fix.new.17339/ghc-data-fix.changes 2024-07-22 17:17:03.267009555 +0200 @@ -1,0 +2,9 @@ +Thu Jul 4 20:04:07 UTC 2024 - Peter Simons <[email protected]> + +- Update data-fix to version 0.3.4. + ## 0.3.4 + + - Use quantified constraints superclasses for `Eq`, `Ord`, `NFData` and + `Hashable Fix` instances, when available. + +------------------------------------------------------------------- Old: ---- data-fix-0.3.3.tar.gz New: ---- data-fix-0.3.4.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-data-fix.spec ++++++ --- /var/tmp/diff_new_pack.LkmEYZ/_old 2024-07-22 17:17:04.231047880 +0200 +++ /var/tmp/diff_new_pack.LkmEYZ/_new 2024-07-22 17:17:04.231047880 +0200 @@ -19,7 +19,7 @@ %global pkg_name data-fix %global pkgver %{pkg_name}-%{version} Name: ghc-%{pkg_name} -Version: 0.3.3 +Version: 0.3.4 Release: 0 Summary: Fixpoint data types License: BSD-3-Clause ++++++ data-fix-0.3.3.tar.gz -> data-fix-0.3.4.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/data-fix-0.3.3/CHANGELOG.md new/data-fix-0.3.4/CHANGELOG.md --- old/data-fix-0.3.3/CHANGELOG.md 2001-09-09 03:46:40.000000000 +0200 +++ new/data-fix-0.3.4/CHANGELOG.md 2001-09-09 03:46:40.000000000 +0200 @@ -1,3 +1,8 @@ +## 0.3.4 + +- Use quantified constraints superclasses for `Eq`, `Ord`, `NFData` and + `Hashable Fix` instances, when available. + ## 0.3.3 - Drop support for GHCs prior 8.6.5 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/data-fix-0.3.3/data-fix.cabal new/data-fix-0.3.4/data-fix.cabal --- old/data-fix-0.3.3/data-fix.cabal 2001-09-09 03:46:40.000000000 +0200 +++ new/data-fix-0.3.4/data-fix.cabal 2001-09-09 03:46:40.000000000 +0200 @@ -1,7 +1,7 @@ +cabal-version: 2.2 Name: data-fix -Version: 0.3.3 -Cabal-Version: >= 1.10 -License: BSD3 +Version: 0.3.4 +License: BSD-3-Clause License-file: LICENSE Author: Anton Kholomiov, Edward Kmett, Oleg Grenrus Maintainer: <[email protected]> @@ -26,7 +26,7 @@ || ==9.0.2 || ==9.2.8 || ==9.4.8 - || ==9.6.5 + || ==9.6.6 || ==9.8.2 || ==9.10.1 @@ -49,6 +49,6 @@ -Wredundant-constraints -Widentities -Wmissing-export-lists build-depends: - base >=4.12.0.0 && <4.21 - , deepseq >=1.4.4.0 && <1.6 - , hashable >=1.4.4.0 && <1.5 + , base >=4.12.0.0 && <4.21 + , deepseq >=1.4.4.0 && <1.6 + , hashable >=1.4.4.0 && <1.6 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/data-fix-0.3.3/src/Data/Fix.hs new/data-fix-0.3.4/src/Data/Fix.hs --- old/data-fix-0.3.3/src/Data/Fix.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/data-fix-0.3.4/src/Data/Fix.hs 2001-09-09 03:46:40.000000000 +0200 @@ -9,6 +9,7 @@ {-# LANGUAGE UndecidableInstances #-} #define HAS_POLY_TYPEABLE MIN_VERSION_base(4,7,0) +#define HAS_QUANTIFIED_FUNCTOR_CLASSES MIN_VERSION_base(4,18,0) #if HAS_POLY_TYPEABLE {-# LANGUAGE StandaloneDeriving #-} @@ -97,7 +98,7 @@ import Control.Monad (liftM) import Data.Function (on) -import Data.Functor.Classes (Eq1, Ord1, Read1, Show1, compare1, eq1, readsPrec1, showsPrec1) +import Data.Functor.Classes (Eq1, Ord1, Read1, Show1, readsPrec1, showsPrec1) import Data.Hashable (Hashable (..)) import Data.Hashable.Lifted (Hashable1, hashWithSalt1) import Data.Typeable (Typeable) @@ -114,6 +115,10 @@ import Data.Data #endif +#if !HAS_QUANTIFIED_FUNCTOR_CLASSES +import Data.Functor.Classes (compare1, eq1) +#endif + -- $setup -- >>> :set -XDeriveFunctor -- >>> import Prelude @@ -191,10 +196,24 @@ ------------------------------------------------------------------------------- instance Eq1 f => Eq (Fix f) where +#if HAS_QUANTIFIED_FUNCTOR_CLASSES + Fix a == Fix b = a == b +#else Fix a == Fix b = eq1 a b +#endif instance Ord1 f => Ord (Fix f) where +#if HAS_QUANTIFIED_FUNCTOR_CLASSES + compare (Fix a) (Fix b) = compare a b + min (Fix a) (Fix b) = Fix (min a b) + max (Fix a) (Fix b) = Fix (max a b) + Fix a >= Fix b = a >= b + Fix a > Fix b = a > b + Fix a < Fix b = a < b + Fix a <= Fix b = a <= b +#else compare (Fix a) (Fix b) = compare1 a b +#endif instance Show1 f => Show (Fix f) where showsPrec d (Fix a) = @@ -214,12 +233,25 @@ ------------------------------------------------------------------------------- instance Hashable1 f => Hashable (Fix f) where +#if MIN_VERSION_hashable(1,5,0) + hash (Fix x) = hash x + hashWithSalt salt (Fix x) = hashWithSalt salt x +#else hashWithSalt salt = hashWithSalt1 salt . unFix +#endif + +------------------------------------------------------------------------------- +-- deepseq +------------------------------------------------------------------------------- #if MIN_VERSION_deepseq(1,4,3) instance NFData1 f => NFData (Fix f) where +#if MIN_VERSION_deepseq(1,5,0) + rnf (Fix a) = rnf a +#else rnf = rnf1 . unFix #endif +#endif ------------------------------------------------------------------------------- -- Typeable and Data
