bytable 0.0.0.6 → 0.0.0.7
raw patch · 2 files changed
+7/−3 lines, 2 filesPVP: minor bump suggested
API additions: PVP suggests at least a minor version bump
API changes (from Hackage documentation)
+ Codec.Bytable: addLength :: (Bytable n, Num n) => n -> ByteString -> ByteString
Files
- bytable.cabal +2/−2
- src/Codec/Bytable.hs +5/−1
bytable.cabal view
@@ -2,7 +2,7 @@ build-type: Simple name: bytable-version: 0.0.0.6+version: 0.0.0.7 stability: Experimental author: Yoshikuni Jujo <PAF01143@nifty.ne.jp> maintainer: Yoshikuni Jujo <PAF01143@nifty.ne.jp>@@ -28,7 +28,7 @@ source-repository this type: git location: git://github.com/YoshikuniJujo/forest- tag: bytable-0.0.0.6+ tag: bytable-0.0.0.7 library hs-source-dirs: src
src/Codec/Bytable.hs view
@@ -4,7 +4,7 @@ Bytable(..), Parsable(..), BytableM(..), evalBytableM, execBytableM,- head, take, null, list,+ head, take, null, list, addLength, ) where import Prelude hiding (take, head, null)@@ -72,3 +72,7 @@ lst = do e <- null if e then return [] else (:) <$> m <*> lst++addLength :: (Bytable n, Num n) => n -> BS.ByteString -> BS.ByteString+addLength t bs =+ toByteString (fromIntegral (BS.length bs) `asTypeOf` t) `BS.append` bs