From: simonpj <unknown>
Date: Tue, 19 Jul 2005 22:55:10 +0000 (+0000)
Subject: [project @ 2005-07-19 22:55:10 by simonpj]
X-Git-Tag: Initial_conversion_from_CVS_complete~344
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=c2cc00b0c295f54cf8fbab195902a9185859946b;p=ghc-hetmet.git

[project @ 2005-07-19 22:55:10 by simonpj]
remove RnSource.lhs-boot and add RnExpr.lhs-boot
---

diff --git a/ghc/compiler/rename/RnExpr.lhs-boot b/ghc/compiler/rename/RnExpr.lhs-boot
new file mode 100644
index 0000000..b03f50a
--- /dev/null
+++ b/ghc/compiler/rename/RnExpr.lhs-boot
@@ -0,0 +1,17 @@
+\begin{code}
+module RnExpr where
+import HsSyn
+import Name	( Name )
+import NameSet	( FreeVars )
+import RdrName	( RdrName )
+import TcRnTypes
+
+rnLExpr :: LHsExpr RdrName
+	-> RnM (LHsExpr Name, FreeVars)
+
+rnStmts :: forall thing.
+	   HsStmtContext Name -> [LStmt RdrName] 
+	-> RnM (thing, FreeVars)
+	-> RnM (([LStmt Name], thing), FreeVars)
+\end{code}
+
diff --git a/ghc/compiler/rename/RnSource.lhs-boot b/ghc/compiler/rename/RnSource.lhs-boot
deleted file mode 100644
index 28b4aed..0000000
--- a/ghc/compiler/rename/RnSource.lhs-boot
+++ /dev/null
@@ -1,20 +0,0 @@
-\begin{code}
-module RnSource where
-import HsSyn	  ( HsBindGroup, HsGroup, HsSplice )
-import NameSet	  ( FreeVars, DefUses )
-import TcRnTypes  ( RnM, TcGblEnv )
-import RdrName	  ( RdrName )
-import Name	  ( Name )
-
-rnBindGroupsAndThen :: forall b . [HsBindGroup RdrName]
-	-> ([HsBindGroup Name]
- 	-> RnM (b, FreeVars))
-	-> RnM (b, FreeVars)
-
-rnBindGroups :: [HsBindGroup RdrName] -> RnM ([HsBindGroup Name], DefUses)
-
-rnSrcDecls :: HsGroup RdrName  -> RnM (TcGblEnv, HsGroup Name)
-rnSplice   :: HsSplice RdrName -> RnM (HsSplice Name, FreeVars)
-\end{code}
-
-