aboutsummaryrefslogtreecommitdiff
path: root/haddock-api/src/Haddock
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2016-05-11 16:03:44 +0200
committerBen Gamari <ben@smart-cactus.org>2016-05-11 16:03:44 +0200
commit9760ee9efe22f0256d626bc567a7adfc754e9066 (patch)
treed46084df1738e4b72de461cac2b512f4da3e788e /haddock-api/src/Haddock
parent609018dd09c4ffe27f9248b2d8b50f6196cd42b9 (diff)
parent1f05bf72992f603c1fa19aff525d77bf26956c52 (diff)
Merge remote-tracking branch 'origin/master' into ghc-head
Diffstat (limited to 'haddock-api/src/Haddock')
-rw-r--r--haddock-api/src/Haddock/Interface/Create.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/haddock-api/src/Haddock/Interface/Create.hs b/haddock-api/src/Haddock/Interface/Create.hs
index e3ae1175..ffcc28d4 100644
--- a/haddock-api/src/Haddock/Interface/Create.hs
+++ b/haddock-api/src/Haddock/Interface/Create.hs
@@ -533,7 +533,7 @@ mkExportItems
let declNames = getMainDeclBinder (unL decl)
in case () of
_
- -- temp hack: we filter out separately exported ATs, since we haven't decided how
+ -- TODO: temp hack: we filter out separately exported ATs, since we haven't decided how
-- to handle them yet. We should really give an warning message also, and filter the
-- name out in mkVisibleNames...
| t `elem` declATs (unL decl) -> return []