aboutsummaryrefslogtreecommitdiffhomepage
path: root/Pipes/Text
diff options
context:
space:
mode:
Diffstat (limited to 'Pipes/Text')
-rw-r--r--Pipes/Text/Encoding.hs10
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
245encodeUtf8 :: Monad m => Text -> Producer ByteString m () 245encodeUtf8 :: Monad m => Text -> Producer' ByteString m ()
246encodeUtf8 = yield . TE.encodeUtf8 246encodeUtf8 = yield . TE.encodeUtf8
247encodeUtf16LE :: Monad m => Text -> Producer ByteString m () 247encodeUtf16LE :: Monad m => Text -> Producer' ByteString m ()
248encodeUtf16LE = yield . TE.encodeUtf16LE 248encodeUtf16LE = yield . TE.encodeUtf16LE
249encodeUtf16BE :: Monad m => Text -> Producer ByteString m () 249encodeUtf16BE :: Monad m => Text -> Producer' ByteString m ()
250encodeUtf16BE = yield . TE.encodeUtf16BE 250encodeUtf16BE = yield . TE.encodeUtf16BE
251encodeUtf32LE :: Monad m => Text -> Producer ByteString m () 251encodeUtf32LE :: Monad m => Text -> Producer' ByteString m ()
252encodeUtf32LE = yield . TE.encodeUtf32LE 252encodeUtf32LE = yield . TE.encodeUtf32LE
253encodeUtf32BE :: Monad m => Text -> Producer ByteString m () 253encodeUtf32BE :: Monad m => Text -> Producer' ByteString m ()
254encodeUtf32BE = yield . TE.encodeUtf32BE 254encodeUtf32BE = yield . TE.encodeUtf32BE
255 255
256mkCodec :: (forall r m . Monad m => 256mkCodec :: (forall r m . Monad m =>