diff --git a/compiler/GHC/CmmToLlvm/Data.hs b/compiler/GHC/CmmToLlvm/Data.hs index caac121413c062c4e4fb82f32431bcfccf0768dd..95dcaae605dde41db8055bef2c258de68e425f36 100644 --- a/compiler/GHC/CmmToLlvm/Data.hs +++ b/compiler/GHC/CmmToLlvm/Data.hs @@ -89,6 +89,8 @@ genLlvmData (sec, CmmStaticsRaw lbl xs) = do align = case sec of Section CString _ -> if (platformArch platform == ArchS390X) then Just 2 else Just 1 + Section Data _ | platformArch platform == ArchS390X + -> Just 8 _ -> Nothing const = if sectionProtection sec == ReadOnlySection then Constant else Global