Skip to content

GitLab

Commit a985eb21 authored by Simon Marlow's avatar Simon Marlow
Browse files

don't qualify module name for importedSrcLoc

parent 8eb5a108
Hide whitespace changes
Inline Side-by-side
compiler/iface/LoadIface.lhs
View file @ a985eb21
...@@ -315,7 +315,8 @@ loadDecl ignore_prags mod (_version, decl) ...@@ -315,7 +315,8 @@ loadDecl ignore_prags mod (_version, decl)
-- imported name, to fix the module correctly in the cache -- imported name, to fix the module correctly in the cache
mk_new_bndr mod mb_parent occ mk_new_bndr mod mb_parent occ
= newGlobalBinder mod occ mb_parent = newGlobalBinder mod occ mb_parent
(importedSrcLoc (showSDoc (pprModule mod))) (importedSrcLoc (showSDoc (ppr (moduleName mod))))
-- ToDo: qualify with the package name if necessary
doc = ptext SLIT("Declaration for") <+> ppr (ifName decl) doc = ptext SLIT("Declaration for") <+> ppr (ifName decl)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment