git.iko.soy/binary-bits
on master help sign in
Comment
commitf723509cc0547bf842d5d8bfe10a48a0d34553f8 authorLennart Kolmodin <kolmodin@gmail.com> dateSun 5 Jun 2011, 14:56 (15 years ago) parent52d7f53
1 file changed+2
compare with master
unifiedsplit
Data/Binary/Bits/Get.hs+2
Data/Binary/Bits/Get.hs+2
@@ -290,6 +290,8 @@ getWord32be n = ensureBits n >> modifyState (flip readWord32be n)
290290getWord64be :: Int -> BitGet Word64
291291getWord64be n = ensureBits n >> modifyState (flip readWord64be n)
292292
293+-- | Get a @ByteString@. Drops the current byte if we've started to read
294+-- from it.
293295getByteString :: Int -> BitGet ByteString
294296getByteString n = do
295297 ensureBits (n*8)