bencoding 0.4.5.3 → 0.4.5.4
raw patch · 2 files changed
+3/−3 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- bencoding.cabal +1/−1
- src/Data/BEncode.hs +2/−2
bencoding.cabal view
@@ -1,5 +1,5 @@ name: bencoding-version: 0.4.5.3+version: 0.4.5.4 license: BSD3 license-file: LICENSE author: Sam Truzjan
src/Data/BEncode.hs view
@@ -274,7 +274,7 @@ instance (Selector s, GBEncodable f BValue) => GBEncodable (M1 S s f) BDict where {-# INLINE gto #-}- gto s @ (M1 x) = BC.pack (selRename (selName s)) `BD.singleton` gto x+ gto s@(M1 x) = BC.pack (selRename (selName s)) `BD.singleton` gto x {-# INLINE gfrom #-} gfrom = gfromM1S@@ -292,7 +292,7 @@ instance (Constructor c, GBEncodable f BDict, GBEncodable f BList) => GBEncodable (M1 C c f) BValue where {-# INLINE gto #-}- gto con @ (M1 x)+ gto con@(M1 x) | conIsRecord con = BDict (gto x) | otherwise = BList (gto x)