[commit: ghc] master: Point to note about FV eta-expansion performance (98a14ff)
git at git.haskell.org
git at git.haskell.org
Wed Apr 20 22:29:29 UTC 2016
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/98a14ff0560d90eae74f42c33ee0811a15fca50f/ghc
>---------------------------------------------------------------
commit 98a14ff0560d90eae74f42c33ee0811a15fca50f
Author: Bartosz Nitka <niteria at gmail.com>
Date: Wed Apr 20 15:31:14 2016 -0700
Point to note about FV eta-expansion performance
>---------------------------------------------------------------
98a14ff0560d90eae74f42c33ee0811a15fca50f
compiler/types/TyCoRep.hs | 1 +
1 file changed, 1 insertion(+)
diff --git a/compiler/types/TyCoRep.hs b/compiler/types/TyCoRep.hs
index 3eb431d..e1f8534 100644
--- a/compiler/types/TyCoRep.hs
+++ b/compiler/types/TyCoRep.hs
@@ -1370,6 +1370,7 @@ tyCoVarsOfTypeList ty = fvVarList $ tyCoFVsOfType ty
-- See Note [FV naming conventions] in FV.
--
-- Eta-expanded because that makes it run faster (apparently)
+-- See Note [FV eta expansion] in FV for explanation.
tyCoFVsOfType :: Type -> FV
-- See Note [Free variables of types]
tyCoFVsOfType (TyVarTy v) a b c = (unitFV v `unionFV` tyCoFVsOfType (tyVarKind v)) a b c
More information about the ghc-commits
mailing list