[project @ 2005-07-13 13:08:05 by simonmar]

[ghc-hetmet.git] / ghc / rts / RtsUtils.c

diff --git a/ghc/rts/RtsUtils.c b/ghc/rts/RtsUtils.c
index 23bd10e..a448c3e 100644 (file)
--- a/ghc/rts/RtsUtils.c
+++ b/ghc/rts/RtsUtils.c
@@ -54,6 +54,10 @@ typedef uintptr_t my_uintptr_t;
 #endif
 #endif
 
+#if defined(_WIN32)
+#include <windows.h>
+#endif
+
 /* -----------------------------------------------------------------------------
    Result-checking malloc wrappers.
    -------------------------------------------------------------------------- */