diff options
Diffstat (limited to 'ghc')
-rw-r--r-- | ghc/GHCi/UI.hs | 2 | ||||
-rw-r--r-- | ghc/GHCi/UI/Info.hs | 2 | ||||
-rw-r--r-- | ghc/GHCi/UI/Monad.hs | 2 | ||||
-rw-r--r-- | ghc/Main.hs | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/ghc/GHCi/UI.hs b/ghc/GHCi/UI.hs index 87826438e3..13a220298c 100644 --- a/ghc/GHCi/UI.hs +++ b/ghc/GHCi/UI.hs @@ -110,7 +110,7 @@ import qualified Data.IntMap.Strict as IntMap import Data.Time.LocalTime ( getZonedTime ) import Data.Time.Format ( formatTime, defaultTimeLocale ) import Data.Version ( showVersion ) -import Prelude hiding ((<>)) +import Prelude import Exception hiding (catch) import Foreign hiding (void) diff --git a/ghc/GHCi/UI/Info.hs b/ghc/GHCi/UI/Info.hs index f5df1edc38..9c93f17ed7 100644 --- a/ghc/GHCi/UI/Info.hs +++ b/ghc/GHCi/UI/Info.hs @@ -28,7 +28,7 @@ import Data.Map.Strict (Map) import qualified Data.Map.Strict as M import Data.Maybe import Data.Time -import Prelude hiding (mod,(<>)) +import Prelude hiding (mod) import System.Directory import qualified GHC.Core.Utils diff --git a/ghc/GHCi/UI/Monad.hs b/ghc/GHCi/UI/Monad.hs index 27e31b6cf6..bc7e56e48c 100644 --- a/ghc/GHCi/UI/Monad.hs +++ b/ghc/GHCi/UI/Monad.hs @@ -62,7 +62,7 @@ import Data.Time import System.Environment import System.IO import Control.Monad -import Prelude hiding ((<>)) +import Prelude import System.Console.Haskeline (CompletionFunc, InputT) import Control.Monad.Catch diff --git a/ghc/Main.hs b/ghc/Main.hs index 7a356b920a..0699e8d075 100644 --- a/ghc/Main.hs +++ b/ghc/Main.hs @@ -862,7 +862,7 @@ dumpFastStringStats dflags = do -- the "z-encoded" total. putMsg dflags msg where - x `pcntOf` y = int ((x * 100) `quot` y) Outputable.<> char '%' + x `pcntOf` y = int ((x * 100) `quot` y) <> char '%' showPackages, dumpPackages, dumpPackagesSimple :: DynFlags -> IO () showPackages dflags = putStrLn (showSDoc dflags (pprPackages (pkgState dflags))) |