From a239d6bff57c90824200c9e1d12b39a0ab65b7b3 Mon Sep 17 00:00:00 2001
From: Stefan Schulze Frielinghaus <stefansf@linux.ibm.com>
Date: Fri, 24 Nov 2023 12:40:14 +0100
Subject: [PATCH] llvmGen: Set alignment for objects of the data section

Fixes #24163.
---
 compiler/GHC/CmmToLlvm/Data.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/compiler/GHC/CmmToLlvm/Data.hs b/compiler/GHC/CmmToLlvm/Data.hs
index caac121413c0..95dcaae605dd 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
-- 
GitLab