diff options
Diffstat (limited to 'Pipes/Text.hs')
-rw-r--r-- | Pipes/Text.hs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/Pipes/Text.hs b/Pipes/Text.hs index e41689c..de581ad 100644 --- a/Pipes/Text.hs +++ b/Pipes/Text.hs | |||
@@ -1,4 +1,4 @@ | |||
1 | {-# LANGUAGE RankNTypes, TypeFamilies, BangPatterns, Trustworthy #-} | 1 | {-# LANGUAGE RankNTypes, TypeFamilies, BangPatterns, Safe#-} |
2 | 2 | ||
3 | {-| The module @Pipes.Text@ closely follows @Pipes.ByteString@ from | 3 | {-| The module @Pipes.Text@ closely follows @Pipes.ByteString@ from |
4 | the @pipes-bytestring@ package. A draft tutorial can be found in | 4 | the @pipes-bytestring@ package. A draft tutorial can be found in |
@@ -79,9 +79,8 @@ module Pipes.Text ( | |||
79 | , module Pipes.Group | 79 | , module Pipes.Group |
80 | ) where | 80 | ) where |
81 | 81 | ||
82 | import Control.Applicative ((<*)) | ||
83 | import Control.Monad (liftM, join) | 82 | import Control.Monad (liftM, join) |
84 | import Control.Monad.Trans.State.Strict (StateT(..), modify) | 83 | import Control.Monad.Trans.State.Strict (modify) |
85 | import qualified Data.Text as T | 84 | import qualified Data.Text as T |
86 | import Data.Text (Text) | 85 | import Data.Text (Text) |
87 | import qualified Data.Text.Lazy as TL | 86 | import qualified Data.Text.Lazy as TL |
@@ -96,7 +95,6 @@ import qualified Pipes.Parse as PP | |||
96 | import Pipes.Parse (Parser) | 95 | import Pipes.Parse (Parser) |
97 | import qualified Pipes.Prelude as P | 96 | import qualified Pipes.Prelude as P |
98 | import Data.Char (isSpace) | 97 | import Data.Char (isSpace) |
99 | import Data.Word (Word8) | ||
100 | import Foreign.Storable (sizeOf) | 98 | import Foreign.Storable (sizeOf) |
101 | import Data.Bits (shiftL) | 99 | import Data.Bits (shiftL) |
102 | import Prelude hiding ( | 100 | import Prelude hiding ( |