@@ -1,4 +1,4 @@
1−{-# LANGUAGE BangPatterns, CPP, FlexibleInstances, GADTs, OverloadedStrings,
1+{-# LANGUAGE BangPatterns, FlexibleInstances, GADTs, OverloadedStrings,
22 Rank2Types, RecordWildCards, TypeFamilies, TypeSynonymInstances #-}
33{-# OPTIONS_GHC -fno-warn-orphans #-}
44-- |
@@ -65,10 +65,7 @@ module Data.Attoparsec.Text.Internal
6565 , atEnd
6666 ) where
6767
68−#if !MIN_VERSION_base(4,8,0)
69−import Control.Applicative ((<$>))
70−#endif
71−import Control.Applicative ((<|>))
68+import Control.Applicative ((<|>), (<$>), pure, (*>))
7269import Control.Monad (when)
7370import Data.Attoparsec.Combinator ((<?>))
7471import Data.Attoparsec.Internal