[Git][ghc/ghc][wip/T25096] Wibble

[Simon Peyton Jones (@simonpj)]

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


Commits:
c518ef74 by Simon Peyton Jones at 2024-07-22T08:25:15+01:00
Wibble

- - - - -


1 changed file:

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


Changes:

=====================================
compiler/GHC/Core/Opt/OccurAnal.hs
=====================================
@@ -2974,7 +2974,7 @@ zapJoinPointInfo :: JoinPointInfo -> JoinPointInfo
 #ifdef DEBUG
 zapJoinPointInfo jp_info = mapVarEnv (\ _ -> emptyVarEnv) jp_info
 #else
-zapJoinPointInfo jp_info = emptyVarEnv
+zapJoinPointInfo _       = emptyVarEnv
 #endif
 
 extendOneShotsForJoinPoint



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/c518ef74fa78e88b325c5a9634d9a1be13e57d21
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/20240722/b045272d/attachment-0001.html>