diff --git a/ghc/compiler/typecheck/TcClassDcl.lhs b/ghc/compiler/typecheck/TcClassDcl.lhs
index 7b6765cf6222aa0cb45e37817a58e85b11a42e06..3bcb58a061380ab89fa0b0fb25c670eaa4a7ec10 100644
--- a/ghc/compiler/typecheck/TcClassDcl.lhs
+++ b/ghc/compiler/typecheck/TcClassDcl.lhs
@@ -100,6 +100,7 @@ Death to "ExpandingDicts".
 %************************************************************************
 
 \begin{code}
+tcClassDecl1 :: ValueEnv -> RenamedTyClDecl -> TcM s (Name, TyThingDetails)
 tcClassDecl1 rec_env
       	     (ClassDecl context class_name
 			tyvar_names fundeps class_sigs def_methods pragmas