Tidy up rebindable syntax for MDo

[ghc-hetmet.git] / compiler / rename / RnExpr.lhs-boot

diff --git a/compiler/rename/RnExpr.lhs-boot b/compiler/rename/RnExpr.lhs-boot
index 5fba8c3..8870017 100644 (file)
--- a/compiler/rename/RnExpr.lhs-boot
+++ b/compiler/rename/RnExpr.lhs-boot
@@ -11,7 +11,7 @@ rnLExpr :: LHsExpr RdrName
 \r
 rnStmts :: --forall thing.\r
           HsStmtContext Name -> [LStmt RdrName] \r
 \r
 rnStmts :: --forall thing.\r
           HsStmtContext Name -> [LStmt RdrName] \r

-       -> RnM (thing, FreeVars)\r
+        -> ([Name] -> RnM (thing, FreeVars))\r

        -> RnM (([LStmt Name], thing), FreeVars)\r
 \end{code}\r
 \r
        -> RnM (([LStmt Name], thing), FreeVars)\r
 \end{code}\r
 \r