diff options
author | Matthew Pickering <matthewtpickering@gmail.com> | 2019-10-04 11:23:47 +0100 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-02-21 20:44:45 -0500 |
commit | 0a4c89b208c59ddf79c55ee446fcad5a012bb1bc (patch) | |
tree | 2465a40fcd99f5522ee799816c552f20a18a06f7 /compiler/prelude | |
parent | e2cce997320652031e0c6cc62db5e35deff43a79 (diff) | |
download | haskell-0a4c89b208c59ddf79c55ee446fcad5a012bb1bc.tar.gz |
Special case `mkTyConApp liftedTypeKind []`
We really need to make sure that these are shared because otherwise GHC
will allocate thousands of identical `TyConApp` nodes.
See #17292
-------------------------
Metric Decrease:
haddock.Cabal
T14683
-------------------------
Diffstat (limited to 'compiler/prelude')
-rw-r--r-- | compiler/prelude/TysWiredIn.hs-boot | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/prelude/TysWiredIn.hs-boot b/compiler/prelude/TysWiredIn.hs-boot index 023682fe5b..b76f58410a 100644 --- a/compiler/prelude/TysWiredIn.hs-boot +++ b/compiler/prelude/TysWiredIn.hs-boot @@ -15,6 +15,8 @@ coercibleTyCon, heqTyCon :: TyCon unitTy :: Type liftedTypeKind :: Kind +liftedTypeKindTyCon :: TyCon + constraintKind :: Kind runtimeRepTyCon, vecCountTyCon, vecElemTyCon :: TyCon |