Hello community, here is the log from the commit of package ghc-pureMD5 for openSUSE:Factory checked in at 2016-03-26 15:29:14 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-pureMD5 (Old) and /work/SRC/openSUSE:Factory/.ghc-pureMD5.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-pureMD5" Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-pureMD5/ghc-pureMD5.changes 2015-12-29 12:59:06.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.ghc-pureMD5.new/ghc-pureMD5.changes 2016-03-26 17:26:51.000000000 +0100 @@ -1,0 +2,13 @@ +Thu Mar 24 18:54:11 UTC 2016 - [email protected] + +- add no-inline-get-nth-word.patch + * patch by Ben Gamari + * see https://github.com/TomMD/pureMD5/pull/3 for details + +------------------------------------------------------------------- +Mon Mar 21 15:37:50 UTC 2016 - [email protected] + +- fix ppc* builds + * see Haskell Trac #11720 for details + +------------------------------------------------------------------- New: ---- no-inline-get-nth-word.patch ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-pureMD5.spec ++++++ --- /var/tmp/diff_new_pack.TNbSL9/_old 2016-03-26 17:26:52.000000000 +0100 +++ /var/tmp/diff_new_pack.TNbSL9/_new 2016-03-26 17:26:52.000000000 +0100 @@ -1,7 +1,7 @@ # # spec file for package ghc-pureMD5 # -# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -27,6 +27,8 @@ Url: https://hackage.haskell.org/package/%{pkg_name} Source0: https://hackage.haskell.org/package/%{pkg_name}-%{version}/%{pkg_name}-%{version}.tar.gz +# PATCH-FIX-UPSTREAM no-inline-get-nth-word.patch [email protected] -- Do not inline long form of getNthWord. See pull request https://github.com/TomMD/pureMD5/pull/3 for details +Patch: no-inline-get-nth-word.patch BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: ghc-Cabal-devel @@ -58,6 +60,7 @@ %prep %setup -q -n %{pkg_name}-%{version} +%patch -p1 %build %ghc_lib_build ++++++ no-inline-get-nth-word.patch ++++++ Index: pureMD5-2.1.2.1/Data/Digest/Pure/MD5.hs =================================================================== --- pureMD5-2.1.2.1.orig/Data/Digest/Pure/MD5.hs +++ pureMD5-2.1.2.1/Data/Digest/Pure/MD5.hs @@ -241,13 +241,13 @@ applyMD5Rounds par@(MD5Par a b c d) w = #ifdef FastWordExtract getNthWord n b = inlinePerformIO (unsafeUseAsCString b (flip peekElemOff n . castPtr)) +{-# INLINE getNthWord #-} #else getNthWord :: Int -> B.ByteString -> Word32 getNthWord n = right . G.runGet G.getWord32le . B.drop (n * sizeOf (undefined :: Word32)) where right x = case x of Right y -> y #endif -{-# INLINE getNthWord #-} infix 9 .<. (.<.) :: Word8 -> Int -> Word32
