Fix implementation of rnIfaceBndr
authorMatthew Pickering <matthew.pickering@tweag.io>
Fri, 20 Apr 2018 17:32:30 +0000 (13:32 -0400)
committerBen Gamari <ben@smart-cactus.org>
Fri, 20 Apr 2018 22:04:19 +0000 (18:04 -0400)
Reviewers: ezyang, bgamari

Reviewed By: bgamari

Subscribers: thomie, carter

GHC Trac Issues: #15041

Differential Revision: https://phabricator.haskell.org/D4600

compiler/backpack/RnModIface.hs

index c52fce7..afdd89e 100644 (file)
@@ -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