diff options
Diffstat (limited to 'compiler/GHC/Utils/Asm.hs')
| -rw-r--r-- | compiler/GHC/Utils/Asm.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/compiler/GHC/Utils/Asm.hs b/compiler/GHC/Utils/Asm.hs index 2841ad3efa..237e482661 100644 --- a/compiler/GHC/Utils/Asm.hs +++ b/compiler/GHC/Utils/Asm.hs @@ -12,9 +12,10 @@ import GHC.Platform import GHC.Utils.Outputable -- | Generate a section type (e.g. @\@progbits@). See #13937. -sectionType :: Platform -- ^ Target platform +sectionType :: IsLine doc + => Platform -- ^ Target platform -> String -- ^ section type - -> SDoc -- ^ pretty assembler fragment + -> doc -- ^ pretty assembler fragment sectionType platform ty = case platformArch platform of ArchARM{} -> char '%' <> text ty |