Simon Peyton Jones pushed to branch wip/T24466 at Glasgow Haskell Compiler / GHC Commits: f4d80f08 by Simon Peyton Jones at 2026-08-10T08:30:15+01:00 Wibble comments - - - - - 1 changed file: - compiler/GHC/Core/Opt/FloatIn.hs Changes: ===================================== compiler/GHC/Core/Opt/FloatIn.hs ===================================== @@ -860,6 +860,9 @@ sepBindsByDropPoint platform is_case floaters here_fvs fork_fvs n_used_alts = count id used_in_flags -- returns number of Trues in list. + -- A demanded thunk like let x = factorial y in ... could be pushed, but + -- it'll turn into a case-expression so it doesn't allocate directly. + -- So I am experimenting with making it stay put. strict_thunk = case bind of FloatCase{} -> False FloatLet (Rec {}) -> False View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/f4d80f08e32be3727a67962a2c3853d8... -- View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/f4d80f08e32be3727a67962a2c3853d8... You're receiving this email because of your account on gitlab.haskell.org. Manage all notifications: https://gitlab.haskell.org/-/profile/notifications | Help: https://gitlab.haskell.org/help