cereal 0.5.5.0 → 0.5.7.0
raw patch · 4 files changed
+28/−1 lines, 4 filesnew-uploaderPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Data.Serialize: instance Data.Serialize.Serialize Data.Monoid.All
- Data.Serialize: instance Data.Serialize.Serialize Data.Monoid.Any
- Data.Serialize: instance Data.Serialize.Serialize a => Data.Serialize.Serialize (Data.Monoid.Dual a)
- Data.Serialize: instance Data.Serialize.Serialize a => Data.Serialize.Serialize (Data.Monoid.Product a)
- Data.Serialize: instance Data.Serialize.Serialize a => Data.Serialize.Serialize (Data.Monoid.Sum a)
- Data.Serialize.Put: instance Data.Semigroup.Semigroup (Data.Serialize.Put.PutM ())
+ Data.Serialize: instance Data.Serialize.GSerializeGet GHC.Generics.V1
+ Data.Serialize: instance Data.Serialize.GSerializePut GHC.Generics.V1
+ Data.Serialize: instance Data.Serialize.Serialize Data.Semigroup.Internal.All
+ Data.Serialize: instance Data.Serialize.Serialize Data.Semigroup.Internal.Any
+ Data.Serialize: instance Data.Serialize.Serialize a => Data.Serialize.Serialize (Data.Semigroup.Internal.Dual a)
+ Data.Serialize: instance Data.Serialize.Serialize a => Data.Serialize.Serialize (Data.Semigroup.Internal.Product a)
+ Data.Serialize: instance Data.Serialize.Serialize a => Data.Serialize.Serialize (Data.Semigroup.Internal.Sum a)
+ Data.Serialize.Put: instance GHC.Base.Semigroup (Data.Serialize.Put.PutM ())
+ Data.Serialize.Put: runPutMBuilder :: PutM a -> (a, Builder)
Files
- CHANGELOG.md +11/−0
- cereal.cabal +1/−1
- src/Data/Serialize.hs +10/−0
- src/Data/Serialize/Put.hs +6/−0
CHANGELOG.md view
@@ -1,3 +1,14 @@+0.5.7.0+=======+* Added `runPutMBuilder`++0.5.6.0+=======+* Added GSerializeGet and GSerializePut instances for V1++0.5.5.0+=======+* Added Semigroup instances 0.5.4.0 =======
cereal.cabal view
@@ -1,5 +1,5 @@ name: cereal-version: 0.5.5.0+version: 0.5.7.0 license: BSD3 license-file: LICENSE author: Lennart Kolmodin <kolmodin@dtek.chalmers.se>,
src/Data/Serialize.hs view
@@ -592,6 +592,16 @@ gGet = pure U1 {-# INLINE gGet #-} +-- | Always fails to serialize+instance GSerializePut V1 where+ gPut v = v `seq` error "GSerializePut.V1"+ {-# INLINE gPut #-}++-- | Always fails to deserialize+instance GSerializeGet V1 where+ gGet = fail "GSerializeGet.V1"+ {-# INLINE gGet #-}+ instance (GSerializePut a, GSerializePut b) => GSerializePut (a :*: b) where gPut (a :*: b) = gPut a *> gPut b {-# INLINE gPut #-}
src/Data/Serialize/Put.hs view
@@ -34,6 +34,7 @@ , runPutM , runPutLazy , runPutMLazy+ , runPutMBuilder , putBuilder , execPut @@ -225,6 +226,11 @@ runPutMLazy :: PutM a -> (a, L.ByteString) runPutMLazy (Put (PairS f s)) = (f, toLazyByteString s) {-# INLINE runPutMLazy #-}++-- | Run the 'Put' monad and get the result and underlying 'Builder'+runPutMBuilder :: PutM a -> (a, Builder)+runPutMBuilder (Put (PairS f s)) = (f, s)+{-# INLINE runPutMBuilder #-} ------------------------------------------------------------------------