diff options
| author | David Waern <davve@dtek.chalmers.se> | 2008-01-06 14:40:52 +0000 |
|---|---|---|
| committer | David Waern <davve@dtek.chalmers.se> | 2008-01-06 14:40:52 +0000 |
| commit | 671ec1ad8aec260511887788338f186055ac52d1 (patch) | |
| tree | 06a96219aa35f2e24be6837b822968b75c4aead2 /src/Haddock/Types.hs | |
| parent | 64512e4a070a69359bc26d43670cec6abc672caa (diff) | |
Manual merge of a patch to the 0.8 branch
Thu Dec 6 15:00:10 CET 2007 Simon Marlow <simonmar@microsoft.com>
* Source links must point to the original module, not the referring
module
Diffstat (limited to 'src/Haddock/Types.hs')
| -rw-r--r-- | src/Haddock/Types.hs | 4 |
1 files changed, 4 insertions, 0 deletions
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], |