[Git][ghc/ghc][wip/romes/25170] FIX

[Rodrigo Mesquita (@alt-romes)]

Rodrigo Mesquita pushed to branch wip/romes/25170 at Glasgow Haskell Compiler / GHC


Commits:
102fd4cb by Rodrigo Mesquita at 2024-08-21T12:50:13+01:00
FIX

- - - - -


1 changed file:

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


Changes:

=====================================
compiler/GHC/Core/Opt/Simplify/Utils.hs
=====================================
@@ -579,6 +579,8 @@ contArgs (ApplyToVal { sc_arg = arg
                      , sc_env = env
                      , sc_cont = cont })
                      | isEmptyVarEnv (seIdSubst env) -- could we not be a bit smarter? for example, apply the substitution straight away eg if the arg is just a single var?
+                     , isEmptyVarEnv (seTvSubst env)
+                     , isEmptyVarEnv (seCvSubst env)
                      = arg : (contArgs cont)
                      | otherwise
                      = []



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/102fd4cb6f183c92591a538d523a43c2f61884d6
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/20240821/9a2db59a/attachment.html>