diff options
author | Ben Gamari <bgamari.foss@gmail.com> | 2017-03-03 15:47:47 -0500 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2017-03-03 15:47:48 -0500 |
commit | c1dacb8a9c18677495bbe7e41391f8ca7a573070 (patch) | |
tree | 9f3e33766337e42511b75795b264bc4393c08ade /testsuite/tests/th/TH_Roles2.stderr | |
parent | a694cee77b64235b42029fea248453ddf6b17d17 (diff) | |
download | haskell-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.stderr | 10 |
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"#) |