diff options
| author | David Waern <davve@dtek.chalmers.se> | 2007-11-08 02:33:01 +0000 |
|---|---|---|
| committer | David Waern <davve@dtek.chalmers.se> | 2007-11-08 02:33:01 +0000 |
| commit | c797f395fa31616b69f1f562b02c881c30c165a7 (patch) | |
| tree | 662773a35250ebeda71711b1dd7c16f2108bf7a3 /src/Haddock/Interface/Rename.hs | |
| parent | 130c6417627d29c1c50b7c22e49aafe368436983 (diff) | |
Complain if we can't link to wired-in names
Diffstat (limited to 'src/Haddock/Interface/Rename.hs')
| -rw-r--r-- | src/Haddock/Interface/Rename.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/Interface/Rename.hs b/src/Haddock/Interface/Rename.hs index bc857c1e..2c231960 100644 --- a/src/Haddock/Interface/Rename.hs +++ b/src/Haddock/Interface/Rename.hs @@ -61,7 +61,7 @@ renameInterface renamingEnv mod = -- representation. TODO: use the Name constants from the GHC API. -- strings = filter (`notElem` ["()", "[]", "(->)"]) -- (map pretty missingNames) - strings = map pretty . filter (\n -> not (isSystemName n || isWiredInName n || isBuiltInSyntax n)) $ missingNames + strings = map pretty . filter (\n -> not (isSystemName n || isBuiltInSyntax n)) $ missingNames in do -- report things that we couldn't link to. Only do this for non-hidden |