From 4a85c5658b535aa87f9741b9f02b53fd19980ea1 Mon Sep 17 00:00:00 2001 From: Debian Haskell Group Date: Sun, 3 Oct 2021 12:27:00 +0100 Subject: [PATCH] Use native x86_64 instructions on x32 This patch enables a few native 64-bit integer instructions on x32 which are available on this architecture despite using 32-bit pointers. These instructions are present on x86_64 but not on x86 and ghc checks the size of (void *) to determine that. This method fails on x32 since despite using 32-bit pointers and hence sizeof(void *) == 4, it still uses the full x86_64 instruction set and software-emulated variants of the aforementioned 64-bit integer instructions are therefore not present in the toolchain which will make ghc fail to build on x32. See: https://ghc.haskell.org/trac/ghc/ticket/11571 Gbp-Pq: Name x32-use-native-x86_64-insn.patch --- rts/RtsSymbols.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rts/RtsSymbols.c b/rts/RtsSymbols.c index 575b6f04..36223e17 100644 --- a/rts/RtsSymbols.c +++ b/rts/RtsSymbols.c @@ -938,7 +938,7 @@ // 64-bit support functions in libgcc.a -#if defined(__GNUC__) && SIZEOF_VOID_P <= 4 && !defined(_ABIN32) +#if defined(__GNUC__) && SIZEOF_VOID_P <= 4 && !defined(_ABIN32) && !(defined(__x86_64__) && defined(__ILP32__)) #define RTS_LIBGCC_SYMBOLS \ SymI_NeedsProto(__divdi3) \ SymI_NeedsProto(__udivdi3) \ -- 2.30.2