diff options
| -rw-r--r-- | ghc/compiler/rename/RnExpr.lhs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/ghc/compiler/rename/RnExpr.lhs b/ghc/compiler/rename/RnExpr.lhs index 3992a6495d..f48d7326b8 100644 --- a/ghc/compiler/rename/RnExpr.lhs +++ b/ghc/compiler/rename/RnExpr.lhs @@ -616,8 +616,6 @@ rnStmt :: RdrNameStmt -- The thing list of names returned is the list returned by the -- thing_inside, plus the binders of the arguments stmt --- Because of mutual recursion we have to pass in rnExpr. - rnStmt (ParStmt stmtss) thing_inside = mapFvRn rnStmts stmtss `thenRn` \ (bndrstmtss, fv_stmtss) -> let binderss = map fst bndrstmtss |