diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2021-04-20 16:15:44 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2021-05-29 11:58:45 -0400 |
| commit | ec64624768735df24f1b6fe24a2b2e59172cc613 (patch) | |
| tree | ad2a86f46427a701d3d604c01cd763ed52b205cd /compiler/GHC/Stg/Debug.hs | |
| parent | 42c611cffb2387627f80e790f1d175ebad7d9992 (diff) | |
| download | haskell-ec64624768735df24f1b6fe24a2b2e59172cc613.tar.gz | |
Use GHC's State monad consistently
GHC's internal State monad benefits from oneShot annotations on its
state, allowing for more aggressive eta expansion.
We currently don't have monad transformers with the same optimisation,
so we only change uses of the pure State monad here.
See #19657 and 19380.
Metric Decrease:
hie002
Diffstat (limited to 'compiler/GHC/Stg/Debug.hs')
| -rw-r--r-- | compiler/GHC/Stg/Debug.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Stg/Debug.hs b/compiler/GHC/Stg/Debug.hs index 17cb9fdebe..77ef7910ec 100644 --- a/compiler/GHC/Stg/Debug.hs +++ b/compiler/GHC/Stg/Debug.hs @@ -19,7 +19,7 @@ import GHC.Driver.Session import Control.Monad (when) import Control.Monad.Trans.Reader -import Control.Monad.Trans.State +import GHC.Utils.Monad.State.Strict import Control.Monad.Trans.Class import GHC.Types.Unique.Map import GHC.Types.SrcLoc |
