diff options
author | davve <davve@dtek.chalmers.se> | 2006-07-29 21:37:48 +0000 |
---|---|---|
committer | davve <davve@dtek.chalmers.se> | 2006-07-29 21:37:48 +0000 |
commit | c3f8f4f1ab6ef0e0ba46e838055c938c061b6161 (patch) | |
tree | fbea2a8108b7574d352a802e86e1ab140911ff02 /src/HaddockTypes.hs | |
parent | 82a5bcbb729d769a53e9c14b0be9c9b6b8daa548 (diff) |
Complete the renamer
Diffstat (limited to 'src/HaddockTypes.hs')
-rw-r--r-- | src/HaddockTypes.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/HaddockTypes.hs b/src/HaddockTypes.hs index b4cb6921..cd9d4fff 100644 --- a/src/HaddockTypes.hs +++ b/src/HaddockTypes.hs @@ -114,7 +114,7 @@ data ExportItem2 name GHC.Name -- the original name (GHC.LHsDecl name) -- a declaration (Maybe (GHC.HsDoc name)) -- maybe a doc comment - [InstHead2] -- instances relevant to this declaration + [InstHead2 name] -- instances relevant to this declaration | ExportNoDecl2 -- an exported entity for which we have no documentation -- (perhaps becuase it resides in another package) @@ -135,7 +135,7 @@ data ExportItem2 name type InstHead = (HsContext,HsAsst) -type InstHead2 = ([GHC.TyVar], [GHC.PredType], GHC.Class, [GHC.Type]) +type InstHead2 name = ([GHC.HsPred name], name, [GHC.HsType name]) type ModuleMap = Map Module Interface type ModuleMap2 = Map GHC.Module HaddockModule |