diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-05-06 02:21:17 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-05-06 02:21:17 +0100 |
| commit | 5872bf5965d591536d7d9c9f9023c4966ac6ec31 (patch) | |
| tree | b094059aae7dcdfc3ffa873c4e923a2db8141021 /rts/win32 | |
| parent | 6dcf001264e1488b7b3e61c332ba0f26816f4f03 (diff) | |
| download | haskell-5872bf5965d591536d7d9c9f9023c4966ac6ec31.tar.gz | |
Working towards fixing DLLs on Win64
Diffstat (limited to 'rts/win32')
| -rw-r--r-- | rts/win32/ThrIOManager.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/win32/ThrIOManager.c b/rts/win32/ThrIOManager.c index 9561ea6aea..234d4dcfe4 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(i386_HOST_ARCH) && defined(__PIC__)
+#if defined(COMPILING_WINDOWS_DLL)
rts_evalIO(&cap,_imp__base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL);
#else
rts_evalIO(&cap,&base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL);
|