From: Debian Haskell Group <pkg-haskell-maintainers@lists.alioth.debian.org>
Date: Tue, 6 Feb 2018 21:01:18 +0000 (+0000)
Subject: x32-use-native-x86_64-insn
X-Git-Tag: archive/raspbian/8.0.2-11+rpi1^2~6
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=0f9fe9798ba068983a9e858184e9dd92f687d20c;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 fec5cfc0..05c87879 100644
--- a/rts/RtsSymbols.c
+++ b/rts/RtsSymbols.c
@@ -857,7 +857,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)                       \