[commit: ghc] wip/T8503: Use bindLocalNamesFV in rn_inst_info (2a8408d)
git at git.haskell.org
git at git.haskell.org
Fri Nov 22 13:50:38 UTC 2013
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/T8503
Link : http://ghc.haskell.org/trac/ghc/changeset/2a8408dc26c876914b60ae6342568e3776caabd7/ghc
>---------------------------------------------------------------
commit 2a8408dc26c876914b60ae6342568e3776caabd7
Author: Joachim Breitner <mail at joachim-breitner.de>
Date: Fri Nov 22 13:40:34 2013 +0000
Use bindLocalNamesFV in rn_inst_info
>---------------------------------------------------------------
2a8408dc26c876914b60ae6342568e3776caabd7
compiler/typecheck/TcDeriv.lhs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/compiler/typecheck/TcDeriv.lhs b/compiler/typecheck/TcDeriv.lhs
index 80db6f8..088615a 100644
--- a/compiler/typecheck/TcDeriv.lhs
+++ b/compiler/typecheck/TcDeriv.lhs
@@ -432,7 +432,7 @@ renameDeriv is_boot inst_infos bagBinds
= -- Bring the right type variables into
-- scope (yuk), and rename the method binds
ASSERT( null sigs )
- bindLocalNames (map Var.varName tyvars) $
+ bindLocalNamesFV (map Var.varName tyvars) $
do { (rn_binds, fvs) <- rnMethodBinds (is_cls_nm inst) (\_ -> []) binds
; let binds' = InstBindings { ib_binds = rn_binds
, ib_pragmas = []
More information about the ghc-commits
mailing list