[commit: ghc] wip/T15809: Wibble, to fix build (4e11d6c)
git at git.haskell.org
git at git.haskell.org
Wed Nov 21 13:56:19 UTC 2018
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/T15809
Link : http://ghc.haskell.org/trac/ghc/changeset/4e11d6c217226370681cd97bf04217271c63f21c/ghc
>---------------------------------------------------------------
commit 4e11d6c217226370681cd97bf04217271c63f21c
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Wed Nov 21 13:55:54 2018 +0000
Wibble, to fix build
>---------------------------------------------------------------
4e11d6c217226370681cd97bf04217271c63f21c
compiler/typecheck/TcTyClsDecls.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/compiler/typecheck/TcTyClsDecls.hs b/compiler/typecheck/TcTyClsDecls.hs
index 7a8bc9e..1fc675c 100644
--- a/compiler/typecheck/TcTyClsDecls.hs
+++ b/compiler/typecheck/TcTyClsDecls.hs
@@ -1769,7 +1769,7 @@ tcTyFamInstEqn fam_tc mb_clsinfo
; (qtvs, pats, rhs_ty) <- tcFamTyPatsAndGen fam_tc mb_clsinfo
imp_vars (mb_expl_bndrs `orElse` [])
hs_pats
- (tcCheckLHsType rhs_hs_ty res_kind)
+ (tcCheckLHsType rhs_hs_ty)
; (ze, qtvs') <- zonkTyBndrs qtvs
; pats' <- zonkTcTypesToTypesX ze pats
More information about the ghc-commits
mailing list