X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2Fwin32%2FIOManager.c;h=764be698722627b2b92c5cbfa20ae04b38e919ff;hp=2123b8c3a49067562ba5ffc0ce51f12d08cbf308;hb=de6c8e5293c9ef68b597ab2e6d55c3f42a283489;hpb=8971f720a67113308e346598814221228b12a4fc

diff --git a/rts/win32/IOManager.c b/rts/win32/IOManager.c
index 2123b8c..764be69 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