diff options
Diffstat (limited to 'compiler/nativeGen/PprBase.hs')
| -rw-r--r-- | compiler/nativeGen/PprBase.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/nativeGen/PprBase.hs b/compiler/nativeGen/PprBase.hs index b2e574af4c..e5c1a28eb6 100644 --- a/compiler/nativeGen/PprBase.hs +++ b/compiler/nativeGen/PprBase.hs @@ -97,7 +97,7 @@ pprGNUSectionHeader t suffix = sdocWithDynFlags $ \dflags -> let splitSections = gopt Opt_SplitSections dflags subsection | splitSections = char '.' <> ppr suffix | otherwise = empty - in ptext (sLit ".section ") <> ptext header <> subsection + in text ".section " <> ptext header <> subsection where header = case t of Text -> sLit ".text" |