summaryrefslogtreecommitdiff
path: root/compiler/GHC/Iface/Load.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/Iface/Load.hs')
-rw-r--r--compiler/GHC/Iface/Load.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/compiler/GHC/Iface/Load.hs b/compiler/GHC/Iface/Load.hs
index 9bf2aaccc8..bf7ae8e005 100644
--- a/compiler/GHC/Iface/Load.hs
+++ b/compiler/GHC/Iface/Load.hs
@@ -1084,11 +1084,12 @@ showIface logger dflags unit_state name_cache filename = do
qualifyImportedNames mod _
| mod == mi_module iface = NameUnqual
| otherwise = NameNotInScope1
- print_unqual = QueryQualify qualifyImportedNames
+ name_ppr_ctx = QueryQualify qualifyImportedNames
neverQualifyModules
neverQualifyPackages
+ alwaysPrintPromTick
logMsg logger MCDump noSrcSpan
- $ withPprStyle (mkDumpStyle print_unqual)
+ $ withPprStyle (mkDumpStyle name_ppr_ctx)
$ pprModIface unit_state iface
-- | Show a ModIface but don't display details; suitable for ModIfaces stored in