[haddock @ 2002-04-26 11:18:56 by simonmar]

- support for fundeps (partially contributed by Brett Letner - thanks
  Brett).

- make it build with GHC 4.08.2

1 files changed, 1 insertions, 1 deletions

diff --git a/src/HaddockDB.hs b/src/HaddockDB.hs
index 446bce1d..80bc1b7c 100644
--- a/src/HaddockDB.hs
+++ b/src/HaddockDB.hs
@@ -70,7 +70,7 @@ ppIfaces mods
 	        ++ map ppHsName args)
             <+> vcat (zipWith (<+>) (equals : repeat (char '|'))
                                     (map ppHsConstr cons))
-     do_decl (HsClassDecl loc ty decl)
+     do_decl (HsClassDecl loc ty fds decl)
 	= hsep [text "class", ppHsType ty]
      do_decl decl
 	= empty