[Git][ghc/ghc][wip/simplifier-tweaks] Remove trace

[Simon Peyton Jones (@simonpj)]

Simon Peyton Jones pushed to branch wip/simplifier-tweaks at Glasgow Haskell Compiler / GHC


Commits:
f737fa77 by Simon Peyton Jones at 2023-06-28T22:46:14+01:00
Remove trace

- - - - -


1 changed file:

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


Changes:

=====================================
compiler/GHC/Core/Opt/Simplify/Iteration.hs
=====================================
@@ -3685,7 +3685,7 @@ mkDupableContWithDmds env _
   | isNothing (isDataConId_maybe (ai_fun fun))
   , thumbsUpPlanA cont  -- See point (3) of Note [Duplicating join points]
   = -- Use Plan A of Note [Duplicating StrictArg]
-    pprTrace "Using plan A" (ppr (ai_fun fun) $$ text "args" <+> ppr (ai_args fun) $$ text "cont" <+> ppr cont) $
+--    pprTrace "Using plan A" (ppr (ai_fun fun) $$ text "args" <+> ppr (ai_args fun) $$ text "cont" <+> ppr cont) $
     do { let (_ : dmds) = ai_dmds fun
        ; (floats1, cont')  <- mkDupableContWithDmds env dmds cont
                               -- Use the demands from the function to add the right



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/f737fa772c9b6ac2996eec08bd523473c9737dfa
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/20230628/6e9e6b37/attachment.html>