diff options
| -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 => |