[Git][ghc/ghc][wip/spj-unf-size] oops remove spurious trace

[Simon Peyton Jones (@simonpj)]

Simon Peyton Jones pushed to branch wip/spj-unf-size at Glasgow Haskell Compiler / GHC


Commits:
9228296c by Simon Peyton Jones at 2023-10-23T16:40:42+01:00
oops remove spurious trace

- - - - -


1 changed file:

- compiler/GHC/Core/Opt/Simplify/Inline.hs


Changes:

=====================================
compiler/GHC/Core/Opt/Simplify/Inline.hs
=====================================
@@ -621,11 +621,9 @@ exprSummary env e = go env e []
       = ArgIsNot cs
 
       | Just rhs <- expandUnfolding_maybe unfolding
-      = pprTrace "exprSummary:expanded" (ppr f <+> text "==>" <+> ppr rhs) $
-        go (zapSubstEnv env) rhs args
+      = go (zapSubstEnv env) rhs args
 
-      | pprTrace "exprSummary:no-expand" (ppr f <+> text "unf" <+> ppr (idUnfolding f)) $
-        idArity f > valArgCount args
+      | idArity f > valArgCount args
       = ArgIsLam
 
       | otherwise



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/9228296c6e5d7edd673a01d4c5e9ff8ec7e475e9

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/9228296c6e5d7edd673a01d4c5e9ff8ec7e475e9
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20231023/4439db69/attachment.html>