X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Ftypes%2FInstEnv.lhs;h=07f68f7b91ce91c6c271b201f7fdce8ddcb20027;hp=753b04a1fd4bfdf46b14543968a1c5de41da770a;hb=16b9e80dc14db24509f051f294b5b51943285090;hpb=3e0a7b9fbc16e432efa562df027d189fa274943a diff --git a/compiler/types/InstEnv.lhs b/compiler/types/InstEnv.lhs index 753b04a..07f68f7 100644 --- a/compiler/types/InstEnv.lhs +++ b/compiler/types/InstEnv.lhs @@ -499,7 +499,7 @@ lookupInstEnv (pkg_ie, home_ie) cls tys find ((item, map (lookup_tv subst) dfun_tvs) : ms) us rest -- Does not match, so next check whether the things unify - -- See Note [overlapping instances] above + -- See Note [Overlapping instances] above | Incoherent <- oflag = find ms us rest