[commit: ghc] master: Fix implementation of rnIfaceBndr (698db813)

git at git.haskell.org git at git.haskell.org
Fri Apr 20 22:04:56 UTC 2018


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/698db813dbc49f6c1e011299e8044b3bafb26847/ghc

>---------------------------------------------------------------

commit 698db813dbc49f6c1e011299e8044b3bafb26847
Author: Matthew Pickering <matthew.pickering at tweag.io>
Date:   Fri Apr 20 13:32:30 2018 -0400

    Fix implementation of rnIfaceBndr
    
    Reviewers: ezyang, bgamari
    
    Reviewed By: bgamari
    
    Subscribers: thomie, carter
    
    GHC Trac Issues: #15041
    
    Differential Revision: https://phabricator.haskell.org/D4600


>---------------------------------------------------------------

698db813dbc49f6c1e011299e8044b3bafb26847
 compiler/backpack/RnModIface.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/backpack/RnModIface.hs b/compiler/backpack/RnModIface.hs
index c52fce7..afdd89e 100644
--- a/compiler/backpack/RnModIface.hs
+++ b/compiler/backpack/RnModIface.hs
@@ -619,7 +619,7 @@ rnIfaceBndrs = mapM rnIfaceBndr
 
 rnIfaceBndr :: Rename IfaceBndr
 rnIfaceBndr (IfaceIdBndr (fs, ty)) = IfaceIdBndr <$> ((,) fs <$> rnIfaceType ty)
-rnIfaceBndr (IfaceTvBndr tv_bndr) = IfaceIdBndr <$> rnIfaceTvBndr tv_bndr
+rnIfaceBndr (IfaceTvBndr tv_bndr) = IfaceTvBndr <$> rnIfaceTvBndr tv_bndr
 
 rnIfaceTvBndr :: Rename IfaceTvBndr
 rnIfaceTvBndr (fs, kind) = (,) fs <$> rnIfaceType kind



More information about the ghc-commits mailing list