diff options
Diffstat (limited to 'compiler/GHC/CmmToAsm/SPARC/CodeGen.hs')
-rw-r--r-- | compiler/GHC/CmmToAsm/SPARC/CodeGen.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/GHC/CmmToAsm/SPARC/CodeGen.hs b/compiler/GHC/CmmToAsm/SPARC/CodeGen.hs index aeaaf1c9d3..ae8ee37cf9 100644 --- a/compiler/GHC/CmmToAsm/SPARC/CodeGen.hs +++ b/compiler/GHC/CmmToAsm/SPARC/CodeGen.hs @@ -53,6 +53,7 @@ import GHC.CmmToAsm.CPrim import GHC.Types.Basic import GHC.Data.FastString import GHC.Data.OrdList +import GHC.Utils.Outputable import GHC.Utils.Panic import GHC.Platform @@ -125,7 +126,7 @@ stmtToInstrs stmt = do platform <- getPlatform config <- getConfig case stmt of - CmmComment s -> return (unitOL (COMMENT s)) + CmmComment s -> return (unitOL (COMMENT $ ftext s)) CmmTick {} -> return nilOL CmmUnwind {} -> return nilOL |