bencode 0.4 → 0.5
raw patch · 4 files changed
+5/−5 lines, 4 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
- Data.BEncode: BInt :: Int -> BEncode
+ Data.BEncode: BInt :: Integer -> BEncode
- Data.BEncode.Lexer: TNumber :: Int -> Token
+ Data.BEncode.Lexer: TNumber :: Integer -> Token
- Data.BEncode.Parser: bint :: BParser BEncode -> BParser Int
+ Data.BEncode.Parser: bint :: BParser BEncode -> BParser Integer
Files
- bencode.cabal +1/−1
- src/Data/BEncode.hs +2/−2
- src/Data/BEncode/Lexer.hs +1/−1
- src/Data/BEncode/Parser.hs +1/−1
bencode.cabal view
@@ -1,5 +1,5 @@ Name: bencode-Version: 0.4+Version: 0.5 Maintainer: Lemmih (lemmih@gmail.com) Author: Lemmih (lemmih@gmail.com), Jesper Louis Andersen Copyright: 2005-2009, Lemmih
src/Data/BEncode.hs view
@@ -58,7 +58,7 @@ {- | The B-coding defines an abstract syntax tree given as a simple data type here -}-data BEncode = BInt Int+data BEncode = BInt Integer | BString L.ByteString | BList [BEncode] | BDict (Map String BEncode)@@ -83,7 +83,7 @@ token' :: (Token -> Maybe a) -> BParser a token' = tokenPrim show updatePos -tnumber :: BParser Int+tnumber :: BParser Integer tnumber = token' fn where fn (TNumber i) = Just i fn _ = Nothing
src/Data/BEncode/Lexer.hs view
@@ -9,7 +9,7 @@ | TList | TInt | TString L.ByteString- | TNumber Int+ | TNumber Integer | TEnd deriving (Show,Eq)
src/Data/BEncode/Parser.hs view
@@ -118,7 +118,7 @@ BString str -> return str _ -> fail $ "Expected BString, found: " ++ show b -bint :: BParser BEncode -> BParser Int+bint :: BParser BEncode -> BParser Integer bint p = do b <- p case b of BInt int -> return int