diff options
| -rw-r--r-- | src/Haddock/Interface/Create.hs | 2 | ||||
| -rw-r--r-- | src/Haddock/Types.hs | 3 |
2 files changed, 0 insertions, 5 deletions
diff --git a/src/Haddock/Interface/Create.hs b/src/Haddock/Interface/Create.hs index 7aa7dcb4..7a0a2e16 100644 --- a/src/Haddock/Interface/Create.hs +++ b/src/Haddock/Interface/Create.hs @@ -65,7 +65,6 @@ createInterface ghcMod flags modMap instIfaceMap = do decls = filterOutInstances decls0 declMap = mkDeclMap decls exports = fmap (reverse . map unLoc) (ghcMbExports ghcMod) - localNames = ghcDefinedNames ghcMod ignoreExps = Flag_IgnoreAllExports `elem` flags exportedNames = ghcExportedNames ghcMod @@ -90,7 +89,6 @@ createInterface ghcMod flags modMap instIfaceMap = do ifaceDoc = mbDoc, ifaceRnDoc = Nothing, ifaceOptions = opts, - ifaceLocals = localNames, ifaceRnDocMap = Map.empty, ifaceExportItems = prunedExportItems, ifaceRnExportItems = [], diff --git a/src/Haddock/Types.hs b/src/Haddock/Types.hs index f65f88e9..4e076a26 100644 --- a/src/Haddock/Types.hs +++ b/src/Haddock/Types.hs @@ -198,9 +198,6 @@ data Interface = Interface { ifaceExportItems :: ![ExportItem Name], ifaceRnExportItems :: [ExportItem DocName], - -- | All names defined in the module. - ifaceLocals :: ![Name], - -- | All names exported by the module. ifaceExports :: ![Name], |