From d879a5a8517b511733406049d46d6df5af20a15b Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sun, 18 Mar 2012 16:30:25 +0000 Subject: Fixes for the threaded RTS on Win64 --- rts/win32/ThrIOManager.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'rts/win32') diff --git a/rts/win32/ThrIOManager.c b/rts/win32/ThrIOManager.c index bad621ced6..afcdc19d27 100644 --- a/rts/win32/ThrIOManager.c +++ b/rts/win32/ThrIOManager.c @@ -152,7 +152,7 @@ ioManagerStart (void) Capability *cap; if (io_manager_event == INVALID_HANDLE_VALUE) { cap = rts_lock(); -#if defined(mingw32_HOST_OS) && defined(__PIC__) +#if defined(mingw32_HOST_OS) && defined(i386_HOST_Arch) && defined(__PIC__) rts_evalIO(&cap,_imp__base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL); #else rts_evalIO(&cap,&base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL); -- cgit v1.2.1