Simon Peyton Jones pushed to branch wip/T26831 at Glasgow Haskell Compiler / GHC Commits: 2df0ec18 by Simon Peyton Jones at 2026-02-13T09:08:55+00:00 Comment out dead code - - - - - 1 changed file: - compiler/GHC/CoreToStg/Prep.hs Changes: ===================================== compiler/GHC/CoreToStg/Prep.hs ===================================== @@ -1622,8 +1622,8 @@ maybeSaturate fn expr n_args unsat_ticks fn_arity = idArity fn excess_arity = (max fn_arity mark_arity) - n_args sat_expr = cpeEtaExpand excess_arity expr - applied_marks = n_args >= (length . dropWhile (not . isMarkedCbv) . - reverse . expectJust $ (idCbvMarks_maybe fn)) +-- applied_marks = n_args >= (length . dropWhile (not . isMarkedCbv) . +-- reverse . expectJust $ (idCbvMarks_maybe fn)) -- For join points we never eta-expand (See Note [Do not eta-expand join points]) -- so we assert all arguments that need to be passed cbv are visible so that the -- backend can evalaute them if required.. View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/2df0ec18e729a5ed4115e5a050d3a9f2... -- View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/2df0ec18e729a5ed4115e5a050d3a9f2... You're receiving this email because of your account on gitlab.haskell.org.