diff options
author | michaelt <what_is_it_to_do_anything@yahoo.com> | 2014-11-12 00:03:36 -0500 |
---|---|---|
committer | michaelt <what_is_it_to_do_anything@yahoo.com> | 2014-11-12 00:03:36 -0500 |
commit | b091cbebda25acfac35c19748c607d26c01b68ec (patch) | |
tree | 0e2766f966f31cc157199c1693560dfe173c5062 /Pipes/Text/Encoding.hs | |
parent | 6c2fffdc8bc84879e103e6838e4f9fc762d50a2d (diff) | |
download | text-pipes-b091cbebda25acfac35c19748c607d26c01b68ec.tar.gz text-pipes-b091cbebda25acfac35c19748c607d26c01b68ec.tar.zst text-pipes-b091cbebda25acfac35c19748c607d26c01b68ec.zip |
tutorial nonsense
Diffstat (limited to 'Pipes/Text/Encoding.hs')
-rw-r--r-- | Pipes/Text/Encoding.hs | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/Pipes/Text/Encoding.hs b/Pipes/Text/Encoding.hs index f26f168..97a9c23 100644 --- a/Pipes/Text/Encoding.hs +++ b/Pipes/Text/Encoding.hs | |||
@@ -1,10 +1,9 @@ | |||
1 | {-# LANGUAGE RankNTypes, BangPatterns #-} | 1 | {-# LANGUAGE RankNTypes, BangPatterns #-} |
2 | 2 | ||
3 | -- | This module uses the stream decoding functions from Michael Snoyman's new | 3 | -- | This module uses the stream decoding functions from |
4 | -- <http://hackage.haskell.org/package/text-stream-decode text-stream-decode> | 4 | -- <http://hackage.haskell.org/package/text-stream-decode text-stream-decode> |
5 | -- package to define decoding functions and lenses. The exported names | 5 | -- package to define decoding functions and lenses. The exported names |
6 | -- conflict with names in @Data.Text.Encoding@ but the module can otherwise be | 6 | -- conflict with names in @Data.Text.Encoding@ but not with the @Prelude@ |
7 | -- imported unqualified. | ||
8 | 7 | ||
9 | module Pipes.Text.Encoding | 8 | module Pipes.Text.Encoding |
10 | ( | 9 | ( |
@@ -55,7 +54,7 @@ import qualified Data.Text as T | |||
55 | import qualified Data.Text.Encoding as TE | 54 | import qualified Data.Text.Encoding as TE |
56 | import qualified Data.Streaming.Text as Stream | 55 | import qualified Data.Streaming.Text as Stream |
57 | import Data.Streaming.Text (DecodeResult(..)) | 56 | import Data.Streaming.Text (DecodeResult(..)) |
58 | import Control.Monad (join) | 57 | import Control.Monad (join, liftM) |
59 | import Data.Word (Word8) | 58 | import Data.Word (Word8) |
60 | import Pipes | 59 | import Pipes |
61 | 60 | ||
@@ -71,8 +70,7 @@ type Lens' a b = forall f . Functor f => (b -> f b) -> (a -> f a) | |||
71 | 70 | ||
72 | is just an alias for a Prelude type. Thus you use any particular codec with | 71 | is just an alias for a Prelude type. Thus you use any particular codec with |
73 | the @view@ / @(^.)@ , @zoom@ and @over@ functions from either of those libraries; | 72 | the @view@ / @(^.)@ , @zoom@ and @over@ functions from either of those libraries; |
74 | we presuppose neither since we already have access to the types they require. | 73 | we presuppose neither library since we already have access to the types they require. |
75 | |||
76 | -} | 74 | -} |
77 | 75 | ||
78 | type Codec | 76 | type Codec |