summaryrefslogtreecommitdiff
path: root/compiler/GHC/CmmToLlvm/Ppr.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/CmmToLlvm/Ppr.hs')
-rw-r--r--compiler/GHC/CmmToLlvm/Ppr.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/CmmToLlvm/Ppr.hs b/compiler/GHC/CmmToLlvm/Ppr.hs
index e71093adaf..8b0577bad7 100644
--- a/compiler/GHC/CmmToLlvm/Ppr.hs
+++ b/compiler/GHC/CmmToLlvm/Ppr.hs
@@ -56,7 +56,7 @@ pprLlvmCmmDecl (CmmProc mb_info entry_lbl live (ListGraph blks))
funDec <- llvmFunSig live lbl link
cfg <- getConfig
platform <- getPlatform
- let buildArg = fsLit . renderWithContext (llvmCgContext cfg). ppPlainName cfg
+ let buildArg = fsLit . showSDocOneLine (llvmCgContext cfg). ppPlainName cfg
funArgs = map buildArg (llvmFunArgs platform live)
funSect = llvmFunSection cfg (decName funDec)