[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