Fix a real bug, exposed by my recent change to the rts_evalIO() API. Yay!
authorSimon Marlow <marlowsd@gmail.com>
Fri, 9 Dec 2011 10:28:31 +0000 (10:28 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Fri, 9 Dec 2011 12:58:09 +0000 (12:58 +0000)
rts/win32/ThrIOManager.c

index f48b203..bad621c 100644 (file)
@@ -153,9 +153,9 @@ ioManagerStart (void)
     if (io_manager_event == INVALID_HANDLE_VALUE) {\r
        cap = rts_lock();\r
 #if defined(mingw32_HOST_OS) && defined(__PIC__)\r
-       rts_evalIO(cap,_imp__base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL);\r
+        rts_evalIO(&cap,_imp__base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL);\r
 #else\r
-       rts_evalIO(cap,&base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL);\r
+        rts_evalIO(&cap,&base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL);\r
 #endif\r
        rts_unlock(cap);\r
     }\r