[Git][ghc/ghc][wip/tyconapp-opts] Inline expandSynTyConApp_maybe

[Ben Gamari]

Ben Gamari pushed to branch wip/tyconapp-opts at Glasgow Haskell Compiler / GHC


Commits:
093330fa by Ben Gamari at 2020-11-11T16:55:52-05:00
Inline expandSynTyConApp_maybe

- - - - -


1 changed file:

- compiler/GHC/Core/Type.hs


Changes:

=====================================
compiler/GHC/Core/Type.hs
=====================================
@@ -434,6 +434,9 @@ expandSynTyConApp_maybe tc tys
           rhs' = substTy (mkTvSubstPrs (tvs `zip` tys)) rhs
   | otherwise
   = Nothing
+-- Without this INLINE the call to expandSynTyConApp_maybe in coreView
+-- will result in an avoidable allocation.
+{-# INLINE expandSynTyConApp_maybe #-}
 
 {-# INLINE coreFullView #-}
 coreFullView :: Type -> Type



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/093330fa202fc62fc0da860b97453b2ed0d7c612
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/20201111/20357be8/attachment-0001.html>