From b7b6aee89676d16ac620f0752900a3dbb74e5843 Mon Sep 17 00:00:00 2001 From: David Waern Date: Mon, 5 Nov 2007 22:25:50 +0000 Subject: Don't warn about not being able to link to wired/system/builtin-names --- src/Haddock/Interface/Rename.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/Haddock/Interface/Rename.hs b/src/Haddock/Interface/Rename.hs index 267428fe..844525cf 100644 --- a/src/Haddock/Interface/Rename.hs +++ b/src/Haddock/Interface/Rename.hs @@ -59,8 +59,9 @@ renameInterface renamingEnv mod = -- filter out certain built in type constructors using their string -- representation. TODO: use the Name constants from the GHC API. - strings = filter (`notElem` ["()", "[]", "(->)"]) - (map pretty missingNames) +-- strings = filter (`notElem` ["()", "[]", "(->)"]) +-- (map pretty missingNames) + strings = map pretty . filter (\n -> not (isSystemName n || isWiredInName n || isBuiltInSyntax n)) $ missingNames in do -- report things that we couldn't link to. Only do this for non-hidden -- cgit v1.2.3