[Git][ghc/ghc][wip/T24466] Wibbles to pipeline

Simon Peyton Jones (@simonpj) gitlab at gitlab.haskell.org
Mon Mar 4 10:56:47 UTC 2024



Simon Peyton Jones pushed to branch wip/T24466 at Glasgow Haskell Compiler / GHC


Commits:
2663025f by Simon Peyton Jones at 2024-03-04T10:56:12+00:00
Wibbles to pipeline

Accidentlly added an unnecessary pass

- - - - -


1 changed file:

- compiler/GHC/Core/Opt/Pipeline.hs


Changes:

=====================================
compiler/GHC/Core/Opt/Pipeline.hs
=====================================
@@ -324,12 +324,11 @@ getCoreToDo dflags hpt_rule_base extra_vars
         -- off one layer of a recursive function (concretely, I saw this
         -- in wheel-sieve1), and I'm guessing that SpecConstr can too
         -- And CSE is a very cheap pass. So it seems worth doing here.
-        runWhen cse $ CoreCSE,
-
-        -- New opportunities for float-in
-        runWhen do_float_in CoreDoFloatInwards,
-
-        simplify "post-O2",
+        -- Also SpecConstr yields new FloatIn possibilities
+        runWhen (liberate_case || spec_constr) $ CoreDoPasses
+           [ runWhen cse CoreCSE
+           , runWhen do_float_in CoreDoFloatInwards
+           , runWhen (cse || do_float_in) $ simplify "post-O2" ],
 
         ---------  End of -O2 passes --------------
 



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/2663025f91cfbeb563a5865ea7f4f1e3ea965568
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/20240304/7fa06d37/attachment-0001.html>


More information about the ghc-commits mailing list