diff options
Diffstat (limited to 'compiler/GHC/CmmToAsm/Dwarf/Types.hs')
| -rw-r--r-- | compiler/GHC/CmmToAsm/Dwarf/Types.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/CmmToAsm/Dwarf/Types.hs b/compiler/GHC/CmmToAsm/Dwarf/Types.hs index 236ddb5ffc..55eb0246bf 100644 --- a/compiler/GHC/CmmToAsm/Dwarf/Types.hs +++ b/compiler/GHC/CmmToAsm/Dwarf/Types.hs @@ -163,8 +163,8 @@ pprDwarfInfo platform haveSrc d -- | Print a CLabel name in a ".stringz \"LABEL\"" pprLabelString :: Platform -> CLabel -> SDoc pprLabelString platform label = - pprString' -- we don't need to escape the string as labels don't contain exotic characters - $ pprCLabel platform CStyle label -- pretty-print as C label (foreign labels may be printed differently in Asm) + pprString' -- we don't need to escape the string as labels don't contain exotic characters + $ pprCLabel platform label -- pretty-print as C label (foreign labels may be printed differently in Asm) -- | Prints assembler data corresponding to DWARF info records. Note -- that the binary format of this is parameterized in @abbrevDecls@ and |