diff options
Diffstat (limited to 'ghc/compiler/main/MkIface.lhs')
| -rw-r--r-- | ghc/compiler/main/MkIface.lhs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/ghc/compiler/main/MkIface.lhs b/ghc/compiler/main/MkIface.lhs index 6edc9d5570..24e51c9251 100644 --- a/ghc/compiler/main/MkIface.lhs +++ b/ghc/compiler/main/MkIface.lhs @@ -241,8 +241,9 @@ ifaceDeprecations if_hdl deprecations ptext SLIT("##-}") ]) where - pprIfaceDeprec (DeprecMod txt) = doubleQuotes (ppr txt) - pprIfaceDeprec (DeprecName n txt) = ppr n <+> doubleQuotes (ppr txt) + -- SUP: TEMPORARY HACK, ignoring module deprecations and constructors for now + pprIfaceDeprec (Deprecation (IEModuleContents _) txt) = doubleQuotes (ppr txt) + pprIfaceDeprec (Deprecation (IEVar n) txt) = ppr n <+> doubleQuotes (ppr txt) \end{code} %************************************************************************ |