summaryrefslogtreecommitdiff
path: root/compiler/types/FamInstEnv.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/types/FamInstEnv.hs')
-rw-r--r--compiler/types/FamInstEnv.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/types/FamInstEnv.hs b/compiler/types/FamInstEnv.hs
index 56183e1495..de3e867944 100644
--- a/compiler/types/FamInstEnv.hs
+++ b/compiler/types/FamInstEnv.hs
@@ -55,7 +55,7 @@ import Name
import UniqDFM
import Outputable
import Maybes
-import CoreMap
+import GHC.Core.Map
import Unique
import Util
import Var
@@ -220,7 +220,7 @@ instance Outputable FamInst where
pprFamInst :: FamInst -> SDoc
-- Prints the FamInst as a family instance declaration
-- NB: This function, FamInstEnv.pprFamInst, is used only for internal,
--- debug printing. See PprTyThing.pprFamInst for printing for the user
+-- debug printing. See GHC.Core.Ppr.TyThing.pprFamInst for printing for the user
pprFamInst (FamInst { fi_flavor = flavor, fi_axiom = ax
, fi_tvs = tvs, fi_tys = tys, fi_rhs = rhs })
= hang (ppr_tc_sort <+> text "instance"