diff options
Diffstat (limited to 'compiler/GHC/Types/ForeignCall.hs')
| -rw-r--r-- | compiler/GHC/Types/ForeignCall.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Types/ForeignCall.hs b/compiler/GHC/Types/ForeignCall.hs index 41918f34db..e4c8018bb7 100644 --- a/compiler/GHC/Types/ForeignCall.hs +++ b/compiler/GHC/Types/ForeignCall.hs @@ -219,8 +219,8 @@ instance Outputable CCallSpec where | otherwise = text "_unsafe" ppr_fun (StaticTarget st lbl mPkgId isFun) - = text (if isFun then "__ffi_static_ccall" - else "__ffi_static_ccall_value") + = (if isFun then text "__ffi_static_ccall" + else text "__ffi_static_ccall_value") <> gc_suf <+> (case mPkgId of Nothing -> empty |