diff options
| author | Luite Stegeman <stegeman@gmail.com> | 2021-01-27 11:48:42 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-03-20 07:49:15 -0400 |
| commit | 7de3532f0317032f75b76150c5d3a6f76178be04 (patch) | |
| tree | b2d75538bde38581bbb5447889e9810f47e51a0f /compiler/GHC/Cmm | |
| parent | 0107f3568d060b4c979aa3740465c4f6ca4c2bba (diff) | |
| download | haskell-7de3532f0317032f75b76150c5d3a6f76178be04.tar.gz | |
Transfer tickish things to GHC.Types.Tickish
Metric Increase:
MultiLayerModules
Diffstat (limited to 'compiler/GHC/Cmm')
| -rw-r--r-- | compiler/GHC/Cmm/DebugBlock.hs | 2 | ||||
| -rw-r--r-- | compiler/GHC/Cmm/Node.hs | 2 | ||||
| -rw-r--r-- | compiler/GHC/Cmm/Parser.y | 3 |
3 files changed, 3 insertions, 4 deletions
diff --git a/compiler/GHC/Cmm/DebugBlock.hs b/compiler/GHC/Cmm/DebugBlock.hs index 0de3efe044..e6d1f2735e 100644 --- a/compiler/GHC/Cmm/DebugBlock.hs +++ b/compiler/GHC/Cmm/DebugBlock.hs @@ -39,13 +39,13 @@ import GHC.Cmm.BlockId import GHC.Cmm.CLabel import GHC.Cmm import GHC.Cmm.Utils -import GHC.Core import GHC.Data.FastString ( nilFS, mkFastString ) import GHC.Unit.Module import GHC.Utils.Outputable import GHC.Utils.Panic import GHC.Cmm.Ppr.Expr ( pprExpr ) import GHC.Types.SrcLoc +import GHC.Types.Tickish import GHC.Utils.Misc ( seqList ) import GHC.Cmm.Dataflow.Block diff --git a/compiler/GHC/Cmm/Node.hs b/compiler/GHC/Cmm/Node.hs index 37a27fd75f..fe6eac3223 100644 --- a/compiler/GHC/Cmm/Node.hs +++ b/compiler/GHC/Cmm/Node.hs @@ -34,7 +34,7 @@ import GHC.Data.FastString import GHC.Types.ForeignCall import GHC.Utils.Outputable import GHC.Runtime.Heap.Layout -import GHC.Core (CmmTickish) +import GHC.Types.Tickish (CmmTickish) import qualified GHC.Types.Unique as U import GHC.Cmm.Dataflow.Block diff --git a/compiler/GHC/Cmm/Parser.y b/compiler/GHC/Cmm/Parser.y index ceb5ba8bad..8a972b91d5 100644 --- a/compiler/GHC/Cmm/Parser.y +++ b/compiler/GHC/Cmm/Parser.y @@ -224,8 +224,6 @@ import GHC.StgToCmm.Ticky import GHC.StgToCmm.Prof import GHC.StgToCmm.Bind ( emitBlackHoleCode, emitUpdateFrame ) -import GHC.Core ( GenTickish(SourceNote) ) - import GHC.Cmm.Opt import GHC.Cmm.Graph import GHC.Cmm @@ -250,6 +248,7 @@ import GHC.Types.Literal import GHC.Types.Unique import GHC.Types.Unique.FM import GHC.Types.SrcLoc +import GHC.Types.Tickish ( GenTickish(SourceNote) ) import GHC.Driver.Session import GHC.Driver.Ppr import GHC.Driver.Config |