[Git][ghc/ghc][wip/simplifier-tweaks] Wibble

[Simon Peyton Jones (@simonpj)]

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


Commits:
49b10e19 by Simon Peyton Jones at 2023-08-02T23:34:33+01:00
Wibble

- - - - -


1 changed file:

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


Changes:

=====================================
compiler/GHC/Core/Opt/Simplify/Iteration.hs
=====================================
@@ -58,7 +58,7 @@ import GHC.Types.Unique ( hasKey )
 import GHC.Types.Basic
 import GHC.Types.Tickish
 import GHC.Types.Var    ( isTyCoVar )
-import GHC.Types.Var.Set
+-- import GHC.Types.Var.Set
 import GHC.Builtin.PrimOps ( PrimOp (SeqOp, DataToTagOp, TagToEnumOp) )
 import GHC.Builtin.Types.Prim( realWorldStatePrimTy )
 import GHC.Builtin.Names( runRWKey )
@@ -3963,7 +3963,7 @@ mkDupableAlt _env case_bndr jfloats (Alt con alt_bndrs alt_rhs_in)
 
 ok_to_dup_alt :: OutId -> [OutVar] -> OutExpr -> Bool
 -- See Note [Duplicating join points] esp points (DJ2,DJ3)
-ok_to_dup_alt case_bndr alt_bndrs alt_rhs
+ok_to_dup_alt _case_bndr _alt_bndrs alt_rhs
   | exprIsTrivial alt_rhs
   = True   -- Includes things like (case x of {})
 



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/49b10e199b4eae9103ddf34c5fbf958614350733
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/20230802/844f436f/attachment-0001.html>