Fix string size in bson docs to be number of bytes rather than number of utf8 chars

This commit is contained in:
qxjit (David Vollbracht) 2010-04-15 09:00:45 +08:00 committed by Scott R. Parish
parent e0534f6bdd
commit cb223110e6

View file

@ -80,4 +80,4 @@ putS :: L8.ByteString -> Put
putS s = putLazyByteString s >> putNull putS s = putLazyByteString s >> putNull
putStrSz :: L.ByteString -> Put putStrSz :: L.ByteString -> Put
putStrSz s = putI32 (fromIntegral $ 1 + L8.length s) >> putS s putStrSz s = putI32 (fromIntegral $ 1 + L.length s) >> putS s