bytable 0.0.0.4 → 0.0.0.5
raw patch · 2 files changed
+9/−2 lines, 2 filesPVP: minor bump suggested
API additions: PVP suggests at least a minor version bump
API changes (from Hackage documentation)
+ Codec.Bytable.BigEndian: instance Bytable Word64
Files
- bytable.cabal +2/−2
- src/Codec/Bytable/BigEndian.hs +7/−0
bytable.cabal view
@@ -2,7 +2,7 @@ build-type: Simple name: bytable-version: 0.0.0.4+version: 0.0.0.5 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.4+ tag: bytable-0.0.0.5 library hs-source-dirs: src
src/Codec/Bytable/BigEndian.hs view
@@ -32,6 +32,13 @@ "Codec.Bytable.BigEndian: Bytable Word32: too large" toByteString = integralToByteStringN 4 +instance Bytable Word64 where+ fromByteString bs+ | BS.length bs <= 8 = Right $ byteStringToNum bs+ | otherwise = Left+ "Codec.Bytable.BigEndian: Bytable Word32: too large"+ toByteString = integralToByteStringN 8+ byteStringToNum :: (Num n, Bits n) => BS.ByteString -> n byteStringToNum = wordsToNum . reverse . BS.unpack