X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Frename%2FRnSource.hi-boot-5;h=1ec4d52522c6ac3676382fbbbaadaca0e5928b97;hb=d1c1b7d0e7b94ede238845c91f58582bad3b3ef3;hp=6b86c6332ce6a4fc1317346987ab416927a0e643;hpb=9af77fa423926fbda946b31e174173d0ec5ebac8;p=ghc-hetmet.git

diff --git a/ghc/compiler/rename/RnSource.hi-boot-5 b/ghc/compiler/rename/RnSource.hi-boot-5
index 6b86c63..1ec4d52 100644
--- a/ghc/compiler/rename/RnSource.hi-boot-5
+++ b/ghc/compiler/rename/RnSource.hi-boot-5
@@ -1,12 +1,13 @@
 __interface RnSource 1 0 where
-__export RnSource rnBinds rnSrcDecls;
+__export RnSource rnBindsAndThen rnBinds rnSrcDecls;
 
-1 rnBinds :: __forall [b] => RdrHsSyn.RdrNameHsBinds
-	-> (RnHsSyn.RenamedHsBinds
+1 rnBindsAndThen :: __forall [b] => [HsBinds.HsBindGroup RdrName.RdrName]
+	-> ([HsBinds.HsBindGroup Name.Name]
  	-> TcRnTypes.RnM (b, NameSet.FreeVars))
 	-> TcRnTypes.RnM (b, NameSet.FreeVars) ;
 
-1 rnSrcDecls :: [RdrHsSyn.RdrNameHsDecl]
-	   -> TcRnTypes.RnM (TcRnTypes.TcGblEnv, [RnHsSyn.RenamedHsDecl], NameSet.FreeVars) ;
-
+1 rnBinds :: [HsBinds.HsBindGroup RdrName.RdrName]
+	-> TcRnTypes.RnM ([HsBinds.HsBindGroup Name.Name], NameSet.DefUses) ;
 
+1 rnSrcDecls :: HsDecls.HsGroup RdrName.RdrName
+	   -> TcRnTypes.RnM (TcRnTypes.TcGblEnv, HsDecls.HsGroup Name.Name)