X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FInterpreter.c;h=339d4d8f8849e3e5ea6ad9ecc62712ff8f5429b4;hb=2fe38b5fb0957f9428864afd69ad3ccd82fae3d0;hp=ea2064fd04c0a5cad2d02fe9fdb70189e27d0fbe;hpb=656e9d6b1db053c88ba1518b6095060347e09418;p=ghc-hetmet.git

diff --git a/rts/Interpreter.c b/rts/Interpreter.c
index ea2064f..339d4d8 100644
--- a/rts/Interpreter.c
+++ b/rts/Interpreter.c
@@ -27,6 +27,13 @@
 #include <errno.h>
 #endif
 
+// When building the RTS in the non-dyn way on Windows, we don't
+//	want declspec(__dllimport__) on the front of function prototypes
+//	from libffi.
+#if defined(mingw32_HOST_OS) && !defined(__PIC__)
+# define LIBFFI_NOT_DLL
+#endif
+
 #include "ffi.h"
 
 /* --------------------------------------------------------------------------