summaryrefslogtreecommitdiff
path: root/compiler/GHC/CmmToAsm/PPC/Instr.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/CmmToAsm/PPC/Instr.hs')
-rw-r--r--compiler/GHC/CmmToAsm/PPC/Instr.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/compiler/GHC/CmmToAsm/PPC/Instr.hs b/compiler/GHC/CmmToAsm/PPC/Instr.hs
index 54a73f24a9..2f99528498 100644
--- a/compiler/GHC/CmmToAsm/PPC/Instr.hs
+++ b/compiler/GHC/CmmToAsm/PPC/Instr.hs
@@ -51,8 +51,8 @@ import GHC.Cmm.Dataflow.Collections
import GHC.Cmm.Dataflow.Label
import GHC.Cmm
import GHC.Cmm.Info
-import GHC.Data.FastString
import GHC.Cmm.CLabel
+import GHC.Utils.Outputable
import GHC.Utils.Panic
import GHC.Platform
import GHC.Types.Unique.FM (listToUFM, lookupUFM)
@@ -61,6 +61,7 @@ import GHC.Types.Unique.Supply
import Control.Monad (replicateM)
import Data.Maybe (fromMaybe)
+
--------------------------------------------------------------------------------
-- Format of a PPC memory address.
--
@@ -177,7 +178,7 @@ data RI
data Instr
-- comment pseudo-op
- = COMMENT FastString
+ = COMMENT SDoc
-- location pseudo-op (file, line, col, name)
| LOCATION Int Int Int String