summaryrefslogtreecommitdiff
path: root/testsuite/tests/th/TH_Roles2.stderr
diff options
context:
space:
mode:
authorBen Gamari <bgamari.foss@gmail.com>2017-03-03 15:47:47 -0500
committerBen Gamari <ben@smart-cactus.org>2017-03-03 15:47:48 -0500
commitc1dacb8a9c18677495bbe7e41391f8ca7a573070 (patch)
tree9f3e33766337e42511b75795b264bc4393c08ade /testsuite/tests/th/TH_Roles2.stderr
parenta694cee77b64235b42029fea248453ddf6b17d17 (diff)
downloadhaskell-c1dacb8a9c18677495bbe7e41391f8ca7a573070.tar.gz
Produce KindReps for common kinds in GHC.Types
Unfortunately this comes with a fair bit of implementation cost. Perhaps some refactoring would help, but in the interest of getting 8.2 out the door I'm pushing as-is. While this doesn't have nearly the effect on compiler allocations that D3166 has, it's still nothing to sneeze at. nofib shows, ``` ------------------------------------------------------------------------ Program master D3166 D3219 ------------------------------------------------------------------------ -1 s.d. ----- -3.555% -4.081% +1 s.d. ----- +1.937% +1.593% Average ----- -0.847% -1.285% ``` Test Plan: Validate Reviewers: austin Subscribers: thomie, simonmar Differential Revision: https://phabricator.haskell.org/D3219
Diffstat (limited to 'testsuite/tests/th/TH_Roles2.stderr')
-rw-r--r--testsuite/tests/th/TH_Roles2.stderr10
1 files changed, 4 insertions, 6 deletions
diff --git a/testsuite/tests/th/TH_Roles2.stderr b/testsuite/tests/th/TH_Roles2.stderr
index 37dcbaa3b5..65b8c1d442 100644
--- a/testsuite/tests/th/TH_Roles2.stderr
+++ b/testsuite/tests/th/TH_Roles2.stderr
@@ -16,12 +16,10 @@ TH_Roles2.$tcT
TH_Roles2.$trModule
(GHC.Types.TrNameS "T"#)
1
- $krep_a3U5
-$krep_a3U6 [InlPrag=[~]] = GHC.Types.KindRepVar 0
-$krep_a3U5 [InlPrag=[~]]
- = GHC.Types.KindRepFun $krep_a3U6 $krep_a3U7
-$krep_a3U7 [InlPrag=[~]]
- = GHC.Types.KindRepTYPE GHC.Types.LiftedRep
+ $krep_a3TO
+$krep_a3TP [InlPrag=[~]] = GHC.Types.KindRepVar 0
+$krep_a3TO [InlPrag=[~]]
+ = GHC.Types.KindRepFun $krep_a3TP GHC.Types.krep$*
TH_Roles2.$trModule
= GHC.Types.Module
(GHC.Types.TrNameS "main"#) (GHC.Types.TrNameS "TH_Roles2"#)