[Git][ghc/ghc][wip/T17910] Wibble unused variable

[Simon Peyton Jones (@simonpj)]

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


Commits:
2f7dbf2b by Simon Peyton Jones at 2023-09-21T16:55:39+01:00
Wibble unused variable

- - - - -


1 changed file:

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


Changes:

=====================================
compiler/GHC/Core/Opt/SetLevels.hs
=====================================
@@ -737,7 +737,7 @@ lvlMFE env strict_ctxt ann_expr
 
     is_con_app (Cast e _) = is_con_app e
     is_con_app (Var v)    = isDataConWorkId v
-    is_con_app e          = False
+    is_con_app _          = False
 
     -- See Note [Floating to the top]
     saves_alloc =  isTopLvl dest_lvl



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/2f7dbf2b7ef129257c2ccb65d3d54fa20bea0f84

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/2f7dbf2b7ef129257c2ccb65d3d54fa20bea0f84
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/20230921/53903324/attachment.html>