X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Frename%2FRnExpr.lhs;h=f927ececdf184ca4270c856696dd1e2ca33ee30f;hb=f1bc2f1b8f45a2397c1a5dfd32de0811227d5c93;hp=33b941e197bc95e5ece8cf1b2b6d06ff769c8d4a;hpb=a022fe5001d0d3da666b331aeb6f36f7b6521a72;p=ghc-hetmet.git diff --git a/ghc/compiler/rename/RnExpr.lhs b/ghc/compiler/rename/RnExpr.lhs index 33b941e..f927ece 100644 --- a/ghc/compiler/rename/RnExpr.lhs +++ b/ghc/compiler/rename/RnExpr.lhs @@ -831,6 +831,7 @@ rnMDoStmts stmts in returnM stmts_w_fvs where + doc = text "In a recursive mdo-expression"