[Git][ghc/ghc][wip/T18894] Try to find all top-level bindings interesting

[Sebastian Graf]

Sebastian Graf pushed to branch wip/T18894 at Glasgow Haskell Compiler / GHC


Commits:
549af695 by Sebastian Graf at 2020-11-25T18:42:41+01:00
Try to find all top-level bindings interesting

- - - - -


1 changed file:

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


Changes:

=====================================
compiler/GHC/Core/Opt/DmdAnal.hs
=====================================
@@ -575,7 +575,7 @@ strict in |y|.
 -- or not. Other top-level bindings are boring.
 isInterestingTopLevelFn :: Id -> Bool
 isInterestingTopLevelFn id =
-  typeArity (idType id) `lengthExceeds` 0
+  typeArity (idType id) `lengthExceeds` 0 || True
 
 dmdTransform :: AnalEnv         -- ^ The strictness environment
              -> Id              -- ^ The function



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/549af6957748293cd497ccbef421c30666b56f31
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/20201125/624e108d/attachment.html>