diff options
Diffstat (limited to 'ghc/Main.hs')
| -rw-r--r-- | ghc/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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))) |