From: Debian Haskell Group <pkg-haskell-maintainers@lists.alioth.debian.org>
Date: Sat, 17 Dec 2016 02:44:45 +0000 (+0000)
Subject: x32-use-native-x86_64-insn
X-Git-Tag: archive/raspbian/8.0.2-9+rpi1~1^2~5
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=798b394daa23cde8f3f495acaf4e10be8d43d761;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 3e82cdff..f6e30e8b 100644
--- a/rts/RtsSymbols.c
+++ b/rts/RtsSymbols.c
@@ -737,7 +737,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)                       \