@@ -1,5 +1,4 @@
11{-# LANGUAGE BangPatterns, FlexibleInstances, TypeSynonymInstances #-}
2−{-# OPTIONS_GHC -fno-warn-orphans #-}
32
43-- |
54-- Module : Data.Attoparsec.Text
@@ -104,16 +103,12 @@ import Data.Bits (Bits, (.|.), shiftL)
104103import Data.Char (isAlpha, isDigit, isSpace, ord)
105104import Data.Int (Int8, Int16, Int32, Int64)
106105import Data.Ratio ((%))
107−import Data.String (IsString(..))
108106import Data.Text (Text)
109107import Data.Word (Word8, Word16, Word32, Word64, Word)
110108import qualified Data.Attoparsec.Internal.Types as T
111109import qualified Data.Attoparsec.Text.Internal as I
112110import qualified Data.Text as T
113111
114−instance IsString (Parser Text) where
115− fromString = I.string . T.pack
116−
117112-- $parsec
118113--
119114-- Compared to Parsec 3, Attoparsec makes several tradeoffs. It is