[commit: ghc] master: Fix the Win32 build: A CPP symbol name was wrong (27402ec)

Ian Lynagh igloo at earth.li
Tue Mar 20 19:30:04 CET 2012


Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/27402ecad9fcb6c696b8f495354954fd1f1861e9

>---------------------------------------------------------------

commit 27402ecad9fcb6c696b8f495354954fd1f1861e9
Author: Ian Lynagh <igloo at earth.li>
Date:   Tue Mar 20 14:52:53 2012 +0000

    Fix the Win32 build: A CPP symbol name was wrong

>---------------------------------------------------------------

 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 afcdc19..9561ea6 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);





More information about the Cvs-ghc mailing list