From c4fec35e32ccde79be154f3f6ef53f5b3cebd3da Mon Sep 17 00:00:00 2001
From: "david.waern" <david.waern@gmail.com>
Date: Wed, 24 Feb 2010 22:58:02 +0000
Subject: Remove unused ifaceLocals

---
 src/Haddock/Interface/Create.hs | 2 --
 1 file changed, 2 deletions(-)

(limited to 'src/Haddock/Interface/Create.hs')

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   = [],
-- 
cgit v1.2.3