[commit: ghc] wip/T16039: more eta (6dafb70)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/T16039
Link       : http://ghc.haskell.org/trac/ghc/changeset/6dafb70a4f6fafd63c2cbdf7ab6ef599f1eed446/ghc

>---------------------------------------------------------------

commit 6dafb70a4f6fafd63c2cbdf7ab6ef599f1eed446
Author: Gabor Greif <ggreif at gmail.com>
Date:   Wed Dec 19 14:24:08 2018 +0100

    more eta


>---------------------------------------------------------------

6dafb70a4f6fafd63c2cbdf7ab6ef599f1eed446
 compiler/coreSyn/PprCore.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/compiler/coreSyn/PprCore.hs b/compiler/coreSyn/PprCore.hs
index 812555a..d7bd2e7 100644
--- a/compiler/coreSyn/PprCore.hs
+++ b/compiler/coreSyn/PprCore.hs
@@ -147,11 +147,11 @@ ppr_binding ann (val_bdr, expr)
         lhs_bndrs = take join_arity bndrs
         rhs       = mkLams (drop join_arity bndrs) body
 
-pprParendExpr expr = ppr_expr parens expr
-pprCoreExpr   expr = ppr_expr noParens expr
+pprParendExpr = ppr_expr parens
+pprCoreExpr = ppr_expr noParens
 
 noParens :: SDoc -> SDoc
-noParens pp = pp
+noParens = id
 
 pprOptCo :: Coercion -> SDoc
 -- Print a coercion optionally; i.e. honouring -dsuppress-coercions