Unstream with the proper chunk size.
--HG--
extra : convert_revision : 65db09f3361db82b07472bb917f074f085751deb
commit9c9d4cfe8a41667f53145218a1172be2dce29c02
authorBryan O'Sullivan <bos@serpentine.com>
dateSat 23 May 2009, 01:46 (17 years ago)
parentc26e139
Data/Text/Lazy/Encoding/Fusion.hs+1−1
@@ -122,7 +122,7 @@ unstreamChunks chunkSize (Stream next s0 len) = chunk s0 len
122122
123123-- | /O(n)/ Convert a 'Stream' 'Word8' to a lazy 'ByteString'.
124124unstream :: Stream Word8 -> ByteString
125−unstream = unstreamChunks 64
125+unstream = unstreamChunks defaultChunkSize
126126
127127encodingError :: String -> String -> a
128128encodingError func encoding =