summaryrefslogtreecommitdiff
path: root/compiler/GHC/CmmToAsm/PPC/Instr.hs
diff options
context:
space:
mode:
authorPeter Trommler <ptrommler@acm.org>2020-03-30 08:56:13 +0200
committerPeter Trommler <ptrommler@acm.org>2020-04-21 18:20:03 +0200
commita879d014cbae6c0799c5fb5457963b65b99a81fe (patch)
treec8f031db629ec8add04b97f3b5890e84860fcc97 /compiler/GHC/CmmToAsm/PPC/Instr.hs
parent747093b7c23a1cf92b564eb3d9efe2adc15330df (diff)
downloadhaskell-wip/T11261.tar.gz
PPC NCG: Add DWARF constants and debug labelswip/T11261
Fixes #11261
Diffstat (limited to 'compiler/GHC/CmmToAsm/PPC/Instr.hs')
-rw-r--r--compiler/GHC/CmmToAsm/PPC/Instr.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/compiler/GHC/CmmToAsm/PPC/Instr.hs b/compiler/GHC/CmmToAsm/PPC/Instr.hs
index e622d801a8..674b19ef93 100644
--- a/compiler/GHC/CmmToAsm/PPC/Instr.hs
+++ b/compiler/GHC/CmmToAsm/PPC/Instr.hs
@@ -187,6 +187,9 @@ data Instr
-- comment pseudo-op
= COMMENT FastString
+ -- location pseudo-op (file, line, col, name)
+ | LOCATION Int Int Int String
+
-- some static data spat out during code
-- generation. Will be extracted before
-- pretty-printing.
@@ -643,6 +646,7 @@ ppc_isMetaInstr
ppc_isMetaInstr instr
= case instr of
COMMENT{} -> True
+ LOCATION{} -> True
LDATA{} -> True
NEWBLOCK{} -> True
DELTA{} -> True