diff options
author | Richard Eisenberg <rae@cs.brynmawr.edu> | 2017-03-10 11:31:33 -0500 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2017-03-14 13:34:04 -0400 |
commit | 12a6cc9a98b79a4851fbe40a02c56652338d1c3e (patch) | |
tree | 9e6bc8236215402b61ad50da67f8d222e8ec71b1 /haddock-api/src/Haddock/Interface | |
parent | 9acb2890cdb4369f3bb7fda899ff4d3526040e7d (diff) |
Update Haddock w.r.t. new HsImplicitBndrs
Diffstat (limited to 'haddock-api/src/Haddock/Interface')
-rw-r--r-- | haddock-api/src/Haddock/Interface/Rename.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/haddock-api/src/Haddock/Interface/Rename.hs b/haddock-api/src/Haddock/Interface/Rename.hs index f88d9f4e..b43860fb 100644 --- a/haddock-api/src/Haddock/Interface/Rename.hs +++ b/haddock-api/src/Haddock/Interface/Rename.hs @@ -577,7 +577,8 @@ renameImplicit :: (in_thing -> RnM out_thing) renameImplicit rn_thing (HsIB { hsib_body = thing }) = do { thing' <- rn_thing thing ; return (HsIB { hsib_body = thing' - , hsib_vars = PlaceHolder }) } + , hsib_vars = PlaceHolder + , hsib_closed = PlaceHolder }) } renameWc :: (in_thing -> RnM out_thing) -> HsWildCardBndrs Name in_thing |