From: Debian Haskell Group <pkg-haskell-maintainers@lists.alioth.debian.org>
Date: Sat, 21 Sep 2019 10:06:31 +0000 (+0100)
Subject: x32-use-native-x86_64-insn
X-Git-Tag: archive/raspbian/8.8.1+dfsg1+is+8.6.5+dfsg1-2+rpi1^2~12
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=04b5e69904db538f3cd199590ef92b9dc5e34e20;p=ghc.git

x32-use-native-x86_64-insn


Gbp-Pq: Name x32-use-native-x86_64-insn.patch
---

diff --git a/rts/RtsSymbols.c b/rts/RtsSymbols.c
index 87fa98dd..784ff08d 100644
--- a/rts/RtsSymbols.c
+++ b/rts/RtsSymbols.c
@@ -934,7 +934,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)                       \