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

diff --git a/rts/win32/AsyncIO.c b/rts/win32/AsyncIO.c
index d471ee8..cd0cf38 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) */