From 671ec1ad8aec260511887788338f186055ac52d1 Mon Sep 17 00:00:00 2001 From: David Waern Date: Sun, 6 Jan 2008 14:40:52 +0000 Subject: Manual merge of a patch to the 0.8 branch Thu Dec 6 15:00:10 CET 2007 Simon Marlow * Source links must point to the original module, not the referring module --- src/Haddock/Types.hs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'src/Haddock/Types.hs') diff --git a/src/Haddock/Types.hs b/src/Haddock/Types.hs index 0efffafb..580dc8cc 100644 --- a/src/Haddock/Types.hs +++ b/src/Haddock/Types.hs @@ -13,6 +13,7 @@ import qualified Data.Map as Map import GHC hiding (NoLink) import Outputable +import OccName {-! for DocOption derive: Binary !-} data DocOption @@ -141,6 +142,9 @@ data Interface = Interface { ifaceExportItems :: [ExportItem Name], ifaceRnExportItems :: [ExportItem DocName], + -- | Environment mapping exported names to *original* names + ifaceEnv :: Map OccName Name, + -- | All the names that are defined in this module ifaceLocals :: [Name], -- cgit v1.2.3