diff options
author | michaelt <what_is_it_to_do_anything@yahoo.com> | 2015-09-11 21:32:05 -0400 |
---|---|---|
committer | michaelt <what_is_it_to_do_anything@yahoo.com> | 2015-09-11 21:32:05 -0400 |
commit | 7657ba6229d56cb49caf71d3fbd9cf616876638a (patch) | |
tree | 198cabed39e0402ec8ef175371e48bf272e70cee /Pipes | |
parent | 4543ee0d529f24365e83910c3d4f536047f000bf (diff) | |
download | text-pipes-7657ba6229d56cb49caf71d3fbd9cf616876638a.tar.gz text-pipes-7657ba6229d56cb49caf71d3fbd9cf616876638a.tar.zst text-pipes-7657ba6229d56cb49caf71d3fbd9cf616876638a.zip |
travis again
Diffstat (limited to 'Pipes')
-rw-r--r-- | Pipes/Text.hs | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/Pipes/Text.hs b/Pipes/Text.hs index de581ad..20c226e 100644 --- a/Pipes/Text.hs +++ b/Pipes/Text.hs | |||
@@ -79,14 +79,19 @@ module Pipes.Text ( | |||
79 | , module Pipes.Group | 79 | , module Pipes.Group |
80 | ) where | 80 | ) where |
81 | 81 | ||
82 | import Control.Applicative ((*>)) | ||
82 | import Control.Monad (liftM, join) | 83 | import Control.Monad (liftM, join) |
84 | import Data.Functor.Constant (Constant(..)) | ||
85 | import Data.Functor.Identity (Identity) | ||
83 | import Control.Monad.Trans.State.Strict (modify) | 86 | import Control.Monad.Trans.State.Strict (modify) |
87 | |||
84 | import qualified Data.Text as T | 88 | import qualified Data.Text as T |
85 | import Data.Text (Text) | 89 | import Data.Text (Text) |
86 | import qualified Data.Text.Lazy as TL | 90 | import qualified Data.Text.Lazy as TL |
87 | import Data.ByteString (ByteString) | 91 | import Data.ByteString (ByteString) |
88 | import Data.Functor.Constant (Constant(Constant, getConstant)) | 92 | import Data.Char (isSpace) |
89 | import Data.Functor.Identity (Identity) | 93 | import Foreign.Storable (sizeOf) |
94 | import Data.Bits (shiftL) | ||
90 | 95 | ||
91 | import Pipes | 96 | import Pipes |
92 | import Pipes.Group (folds, maps, concats, intercalates, FreeT(..), FreeF(..)) | 97 | import Pipes.Group (folds, maps, concats, intercalates, FreeT(..), FreeF(..)) |
@@ -94,9 +99,9 @@ import qualified Pipes.Group as PG | |||
94 | import qualified Pipes.Parse as PP | 99 | import qualified Pipes.Parse as PP |
95 | import Pipes.Parse (Parser) | 100 | import Pipes.Parse (Parser) |
96 | import qualified Pipes.Prelude as P | 101 | import qualified Pipes.Prelude as P |
97 | import Data.Char (isSpace) | 102 | |
98 | import Foreign.Storable (sizeOf) | 103 | |
99 | import Data.Bits (shiftL) | 104 | |
100 | import Prelude hiding ( | 105 | import Prelude hiding ( |
101 | all, | 106 | all, |
102 | any, | 107 | any, |