From: Debian Haskell Group <pkg-haskell-maintainers@lists.alioth.debian.org>
Date: Tue, 27 Jun 2017 11:50:03 +0000 (+0100)
Subject: x32-use-native-x86_64-insn
X-Git-Tag: archive/raspbian/8.0.2-9+rpi1^2^2~2
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=ca9dfad590e5479f05819ffee17666e5c751c044;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)                       \