diff options
Diffstat (limited to 'compiler/main/Finder.lhs')
-rw-r--r-- | compiler/main/Finder.lhs | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/compiler/main/Finder.lhs b/compiler/main/Finder.lhs index b5ad08b425..f56c173662 100644 --- a/compiler/main/Finder.lhs +++ b/compiler/main/Finder.lhs @@ -609,7 +609,7 @@ cantFindErr cannot_find _ dflags mod_name find_result tried_these files tried_these files - | null files = empty + | null files = Outputable.empty | verbosity dflags < 3 = ptext (sLit "Use -v to see a list of the files searched for.") | otherwise = @@ -628,14 +628,14 @@ cantFindErr cannot_find _ dflags mod_name find_result in ptext (sLit "Perhaps you need to add") <+> quotes (ppr (packageName pkg)) <+> ptext (sLit "to the build-depends in your .cabal file.") - | otherwise = empty + | otherwise = Outputable.empty mod_hidden pkg = ptext (sLit "it is a hidden module in the package") <+> quotes (ppr pkg) pp_suggestions :: [ModuleSuggestion] -> SDoc pp_suggestions sugs - | null sugs = empty + | null sugs = Outputable.empty | otherwise = hang (ptext (sLit "Perhaps you meant")) 2 (vcat (map pp_sugg sugs)) @@ -643,7 +643,7 @@ cantFindErr cannot_find _ dflags mod_name find_result -- package flags when making suggestions. ToDo: if the original package -- also has a reexport, prefer that one pp_sugg (SuggestVisible m mod o) = ppr m <+> provenance o - where provenance ModHidden = empty + where provenance ModHidden = Outputable.empty provenance (ModOrigin{ fromOrigPackage = e, fromExposedReexport = res, fromPackageFlag = f }) @@ -657,9 +657,9 @@ cantFindErr cannot_find _ dflags mod_name find_result | f = parens (ptext (sLit "defined via package flags to be") <+> ppr mod) - | otherwise = empty + | otherwise = Outputable.empty pp_sugg (SuggestHidden m mod o) = ppr m <+> provenance o - where provenance ModHidden = empty + where provenance ModHidden = Outputable.empty provenance (ModOrigin{ fromOrigPackage = e, fromHiddenReexport = rhs }) | Just False <- e @@ -668,5 +668,5 @@ cantFindErr cannot_find _ dflags mod_name find_result | (pkg:_) <- rhs = parens (ptext (sLit "needs flag -package-key") <+> ppr (packageConfigId pkg)) - | otherwise = empty + | otherwise = Outputable.empty \end{code} |