X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Frename%2FRnExpr.lhs;h=f927ececdf184ca4270c856696dd1e2ca33ee30f;hb=ae0b2a9ed8b2130fff4f12cb8e35055b04354621;hp=33b941e197bc95e5ece8cf1b2b6d06ff769c8d4a;hpb=864388a3bddc77623b438b83070722da1629bf16;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"