[commit: ghc] wip/T12357: Add SCC on builtInOccNames map (d3a8db6)
git at git.haskell.org
git at git.haskell.org
Tue Jul 5 07:48:28 UTC 2016
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/T12357
Link : http://ghc.haskell.org/trac/ghc/changeset/d3a8db6e7a20e8ea3b80c67c8cdfc31ea761d684/ghc
>---------------------------------------------------------------
commit d3a8db6e7a20e8ea3b80c67c8cdfc31ea761d684
Author: Ben Gamari <ben at smart-cactus.org>
Date: Mon Jul 4 21:24:34 2016 -0400
Add SCC on builtInOccNames map
>---------------------------------------------------------------
d3a8db6e7a20e8ea3b80c67c8cdfc31ea761d684
compiler/prelude/TysWiredIn.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/compiler/prelude/TysWiredIn.hs b/compiler/prelude/TysWiredIn.hs
index abec6ff..86c942d 100644
--- a/compiler/prelude/TysWiredIn.hs
+++ b/compiler/prelude/TysWiredIn.hs
@@ -366,7 +366,7 @@ Note [How tuples work] See also Note [Known-key names] in PrelNames
-}
builtInOccNames :: UniqFM (OccName -> Name)
-builtInOccNames = listToUFM $
+builtInOccNames = {-# SCC builtInOccNames #-}listToUFM $
[ (fsLit "[]", choose_ns listTyConName nilDataConName)
, (fsLit ":" , const consDataConName)
, (fsLit "[::]", const parrTyConName)
More information about the ghc-commits
mailing list