X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fposix%2FFileLock.c;h=cb36366070c7bbb54b5f9cc8d4891b782049279c;hb=209e093599d0d4db5487d124895d817c55b7c052;hp=a6052c73819aee5ff2c4fb729638a6be1cbc2d76;hpb=a2a67cd520b9841114d69a87a423dabcb3b4368e;p=ghc-hetmet.git

diff --git a/rts/posix/FileLock.c b/rts/posix/FileLock.c
index a6052c7..cb36366 100644
--- a/rts/posix/FileLock.c
+++ b/rts/posix/FileLock.c
@@ -2,7 +2,7 @@
  *
  * (c) The GHC Team, 2007
  *
- * File locking support as required by Haskell 98
+ * File locking support as required by Haskell
  *
  * ---------------------------------------------------------------------------*/
  
@@ -13,8 +13,9 @@
 #include "Hash.h"
 #include "RtsUtils.h"
 
-#include <unistd.h>
+#include <sys/types.h>
 #include <sys/stat.h>
+#include <unistd.h>
 #include <errno.h>
 
 typedef struct {