From c3f8f4f1ab6ef0e0ba46e838055c938c061b6161 Mon Sep 17 00:00:00 2001 From: davve Date: Sat, 29 Jul 2006 21:37:48 +0000 Subject: Complete the renamer --- src/HaddockTypes.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/HaddockTypes.hs') 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 -- cgit v1.2.3