summaryrefslogtreecommitdiff
path: root/rts/win32
diff options
context:
space:
mode:
authorSimon Marlow <simonmar@microsoft.com>2006-12-01 14:07:53 +0000
committerSimon Marlow <simonmar@microsoft.com>2006-12-01 14:07:53 +0000
commitde6c8e5293c9ef68b597ab2e6d55c3f42a283489 (patch)
treea5e9a295a2c8485b81a901f9f80465cfe40a4cc9 /rts/win32
parent8971f720a67113308e346598814221228b12a4fc (diff)
downloadhaskell-de6c8e5293c9ef68b597ab2e6d55c3f42a283489.tar.gz
Remove the Windows Async IO Manager completely in THREADED_RTS mode
It isn't used here anyway, just making sure the code doesn't get compiled in.
Diffstat (limited to 'rts/win32')
-rw-r--r--rts/win32/AsyncIO.c4
-rw-r--r--rts/win32/IOManager.c5
2 files changed, 9 insertions, 0 deletions
diff --git a/rts/win32/AsyncIO.c b/rts/win32/AsyncIO.c
index d471ee8879..cd0cf38bab 100644
--- a/rts/win32/AsyncIO.c
+++ b/rts/win32/AsyncIO.c
@@ -4,6 +4,9 @@
*
* (c) sof, 2002-2003.
*/
+
+#if !defined(THREADED_RTS)
+
#include "Rts.h"
#include "RtsUtils.h"
#include <windows.h>
@@ -354,3 +357,4 @@ resetAbandonRequestWait( void )
ResetEvent(abandon_req_wait);
}
+#endif /* !defined(THREADED_RTS) */
diff --git a/rts/win32/IOManager.c b/rts/win32/IOManager.c
index 2123b8c3a4..764be69872 100644
--- a/rts/win32/IOManager.c
+++ b/rts/win32/IOManager.c
@@ -4,6 +4,9 @@
*
* (c) sof, 2002-2003.
*/
+
+#if !defined(THREADED_RTS)
+
#include "Rts.h"
#include "IOManager.h"
#include "WorkQueue.h"
@@ -526,3 +529,5 @@ abandonWorkRequest ( int reqID )
*/
LeaveCriticalSection(&ioMan->active_work_lock);
}
+
+#endif