summaryrefslogtreecommitdiff
path: root/rts/win32
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2012-03-20 14:52:53 +0000
committerIan Lynagh <igloo@earth.li>2012-03-20 14:52:53 +0000
commit27402ecad9fcb6c696b8f495354954fd1f1861e9 (patch)
treec8509f259f9f1e9332aa2ab5eb4fae7fb8468f22 /rts/win32
parente24091b0d1b898ccdcb986ebbcc9635352b51d43 (diff)
downloadhaskell-27402ecad9fcb6c696b8f495354954fd1f1861e9.tar.gz
Fix the Win32 build: A CPP symbol name was wrong
Diffstat (limited to 'rts/win32')
-rw-r--r--rts/win32/ThrIOManager.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/win32/ThrIOManager.c b/rts/win32/ThrIOManager.c
index afcdc19d27..9561ea6aea 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(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);