diff options
Diffstat (limited to 'Pipes/Text')
-rw-r--r-- | Pipes/Text/Encoding.hs | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Pipes/Text/Encoding.hs b/Pipes/Text/Encoding.hs index d727c2c..37a4aa3 100644 --- a/Pipes/Text/Encoding.hs +++ b/Pipes/Text/Encoding.hs | |||
@@ -242,15 +242,15 @@ decodeUtf32BE = decodeStream streamUtf32BE | |||
242 | using the encoding functions from Data.Text.Encoding | 242 | using the encoding functions from Data.Text.Encoding |
243 | -} | 243 | -} |
244 | 244 | ||
245 | encodeUtf8 :: Monad m => Text -> Producer ByteString m () | 245 | encodeUtf8 :: Monad m => Text -> Producer' ByteString m () |
246 | encodeUtf8 = yield . TE.encodeUtf8 | 246 | encodeUtf8 = yield . TE.encodeUtf8 |
247 | encodeUtf16LE :: Monad m => Text -> Producer ByteString m () | 247 | encodeUtf16LE :: Monad m => Text -> Producer' ByteString m () |
248 | encodeUtf16LE = yield . TE.encodeUtf16LE | 248 | encodeUtf16LE = yield . TE.encodeUtf16LE |
249 | encodeUtf16BE :: Monad m => Text -> Producer ByteString m () | 249 | encodeUtf16BE :: Monad m => Text -> Producer' ByteString m () |
250 | encodeUtf16BE = yield . TE.encodeUtf16BE | 250 | encodeUtf16BE = yield . TE.encodeUtf16BE |
251 | encodeUtf32LE :: Monad m => Text -> Producer ByteString m () | 251 | encodeUtf32LE :: Monad m => Text -> Producer' ByteString m () |
252 | encodeUtf32LE = yield . TE.encodeUtf32LE | 252 | encodeUtf32LE = yield . TE.encodeUtf32LE |
253 | encodeUtf32BE :: Monad m => Text -> Producer ByteString m () | 253 | encodeUtf32BE :: Monad m => Text -> Producer' ByteString m () |
254 | encodeUtf32BE = yield . TE.encodeUtf32BE | 254 | encodeUtf32BE = yield . TE.encodeUtf32BE |
255 | 255 | ||
256 | mkCodec :: (forall r m . Monad m => | 256 | mkCodec :: (forall r m . Monad m => |