diff options
Diffstat (limited to 'compiler')
-rw-r--r-- | compiler/GHC/Hs/Doc.hs | 4 | ||||
-rw-r--r-- | compiler/GHC/Types/SrcLoc.hs | 4 | ||||
-rw-r--r-- | compiler/GHC/Utils/Misc.hs | 4 | ||||
-rw-r--r-- | compiler/GHC/Utils/Monad.hs | 2 |
4 files changed, 7 insertions, 7 deletions
diff --git a/compiler/GHC/Hs/Doc.hs b/compiler/GHC/Hs/Doc.hs index 209f9608eb..39d477be52 100644 --- a/compiler/GHC/Hs/Doc.hs +++ b/compiler/GHC/Hs/Doc.hs @@ -26,7 +26,7 @@ module GHC.Hs.Doc , emptyDocs ) where -import GHC.Prelude +import GHC.Prelude hiding (Applicative(..)) import GHC.Utils.Binary import GHC.Types.Name @@ -38,7 +38,7 @@ import GHC.Types.Avail import GHC.Types.Name.Set import GHC.Driver.Flags -import Control.Applicative (liftA2) +import Control.Applicative (Applicative(..)) import Data.Data import Data.IntMap (IntMap) import qualified Data.IntMap as IntMap diff --git a/compiler/GHC/Types/SrcLoc.hs b/compiler/GHC/Types/SrcLoc.hs index 306fde89fa..3f68db0c30 100644 --- a/compiler/GHC/Types/SrcLoc.hs +++ b/compiler/GHC/Types/SrcLoc.hs @@ -115,7 +115,7 @@ module GHC.Types.SrcLoc ( ) where -import GHC.Prelude +import GHC.Prelude hiding (Applicative(..)) import GHC.Utils.Misc import GHC.Utils.Json @@ -125,7 +125,7 @@ import GHC.Data.FastString import qualified GHC.Data.Strict as Strict import Control.DeepSeq -import Control.Applicative (liftA2) +import Control.Applicative (Applicative(..)) import Data.Data import Data.List (sortBy, intercalate) import Data.Function (on) diff --git a/compiler/GHC/Utils/Misc.hs b/compiler/GHC/Utils/Misc.hs index 3824f4ad5a..0ddf057ffc 100644 --- a/compiler/GHC/Utils/Misc.hs +++ b/compiler/GHC/Utils/Misc.hs @@ -127,7 +127,7 @@ module GHC.Utils.Misc ( HasDebugCallStack, ) where -import GHC.Prelude +import GHC.Prelude hiding (Applicative(..)) import GHC.Utils.Exception import GHC.Utils.Panic.Plain @@ -141,7 +141,7 @@ import Data.List.NonEmpty ( NonEmpty(..) ) import GHC.Exts import GHC.Stack (HasCallStack) -import Control.Applicative ( liftA2 ) +import Control.Applicative (Applicative(..)) import Control.Monad ( liftM, guard ) import Control.Monad.IO.Class ( MonadIO, liftIO ) import System.IO.Error as IO ( isDoesNotExistError ) diff --git a/compiler/GHC/Utils/Monad.hs b/compiler/GHC/Utils/Monad.hs index 3bf8737990..f9fc02b338 100644 --- a/compiler/GHC/Utils/Monad.hs +++ b/compiler/GHC/Utils/Monad.hs @@ -27,7 +27,7 @@ module GHC.Utils.Monad -- Imports ------------------------------------------------------------------------------- -import GHC.Prelude +import GHC.Prelude hiding (Applicative(..)) import Control.Applicative import Control.Monad |