Hello community, here is the log from the commit of package ghc-cereal for openSUSE:Factory checked in at 2019-01-25 22:43:07 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-cereal (Old) and /work/SRC/openSUSE:Factory/.ghc-cereal.new.28833 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-cereal" Fri Jan 25 22:43:07 2019 rev:12 rq:667134 version:0.5.8.0 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-cereal/ghc-cereal.changes 2018-10-25 08:23:14.191887208 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-cereal.new.28833/ghc-cereal.changes 2019-01-25 22:43:11.855240601 +0100 @@ -1,0 +2,8 @@ +Tue Jan 8 03:01:49 UTC 2019 - [email protected] + +- Update cereal to version 0.5.8.0. + 0.5.8.0 + ======= + * Added ShortByteString instances + +------------------------------------------------------------------- Old: ---- cereal-0.5.7.0.tar.gz New: ---- cereal-0.5.8.0.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-cereal.spec ++++++ --- /var/tmp/diff_new_pack.90YZz3/_old 2019-01-25 22:43:13.027239158 +0100 +++ /var/tmp/diff_new_pack.90YZz3/_new 2019-01-25 22:43:13.027239158 +0100 @@ -1,7 +1,7 @@ # # spec file for package ghc-cereal # -# Copyright (c) 2018 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2019 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 @@ -19,7 +19,7 @@ %global pkg_name cereal %bcond_with tests Name: ghc-%{pkg_name} -Version: 0.5.7.0 +Version: 0.5.8.0 Release: 0 Summary: A binary serialization library License: BSD-3-Clause ++++++ cereal-0.5.7.0.tar.gz -> cereal-0.5.8.0.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/cereal-0.5.7.0/CHANGELOG.md new/cereal-0.5.8.0/CHANGELOG.md --- old/cereal-0.5.7.0/CHANGELOG.md 2018-08-07 18:23:50.000000000 +0200 +++ new/cereal-0.5.8.0/CHANGELOG.md 2001-09-09 03:46:40.000000000 +0200 @@ -1,3 +1,7 @@ +0.5.8.0 +======= +* Added ShortByteString instances + 0.5.7.0 ======= * Added `runPutMBuilder` diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/cereal-0.5.7.0/cereal.cabal new/cereal-0.5.8.0/cereal.cabal --- old/cereal-0.5.7.0/cereal.cabal 2018-08-07 18:23:50.000000000 +0200 +++ new/cereal-0.5.8.0/cereal.cabal 2001-09-09 03:46:40.000000000 +0200 @@ -1,12 +1,12 @@ name: cereal -version: 0.5.7.0 +version: 0.5.8.0 license: BSD3 license-file: LICENSE author: Lennart Kolmodin <[email protected]>, Galois Inc., Lemmih <[email protected]>, Bas van Dijk <[email protected]> -maintainer: Trevor Elliott <[email protected]> +maintainer: Eric Mertens <[email protected]> category: Data, Parsing stability: provisional build-type: Simple diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/cereal-0.5.7.0/src/Data/Serialize.hs new/cereal-0.5.8.0/src/Data/Serialize.hs --- old/cereal-0.5.7.0/src/Data/Serialize.hs 2018-08-07 18:23:50.000000000 +0200 +++ new/cereal-0.5.8.0/src/Data/Serialize.hs 2001-09-09 03:46:40.000000000 +0200 @@ -57,16 +57,17 @@ import Foreign -- And needed for the instances: -import qualified Data.ByteString as B -import qualified Data.ByteString.Lazy as L -import qualified Data.Map as Map -import qualified Data.Monoid as M -import qualified Data.Set as Set -import qualified Data.IntMap as IntMap -import qualified Data.IntSet as IntSet -import qualified Data.Ratio as R -import qualified Data.Tree as T -import qualified Data.Sequence as Seq +import qualified Data.ByteString as B +import qualified Data.ByteString.Lazy as L +import qualified Data.ByteString.Short as S +import qualified Data.Map as Map +import qualified Data.Monoid as M +import qualified Data.Set as Set +import qualified Data.IntMap as IntMap +import qualified Data.IntSet as IntSet +import qualified Data.Ratio as R +import qualified Data.Tree as T +import qualified Data.Sequence as Seq import GHC.Generics @@ -499,6 +500,11 @@ putLazyByteString bs get = get >>= getLazyByteString +instance Serialize S.ShortByteString where + put sbs = do put (S.length sbs) + putShortByteString sbs + get = get >>= getShortByteString + ------------------------------------------------------------------------ -- Maps and Sets diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/cereal-0.5.7.0/tests/RoundTrip.hs new/cereal-0.5.8.0/tests/RoundTrip.hs --- old/cereal-0.5.7.0/tests/RoundTrip.hs 2018-08-07 18:23:50.000000000 +0200 +++ new/cereal-0.5.8.0/tests/RoundTrip.hs 2001-09-09 03:46:40.000000000 +0200 @@ -30,8 +30,8 @@ -- | Did a call to 'quickCheckResult' succeed? isSuccess :: QC.Result -> Bool -isSuccess (Success _ _ _) = True -isSuccess _ = False +isSuccess Success{} = True +isSuccess _ = False tests :: Test tests = testGroup "Round Trip"
