Remove references to Haskell 98
[ghc-hetmet.git] / rts / posix / FileLock.c
index 26e9de4..cb36366 100644 (file)
@@ -2,18 +2,20 @@
  *
  * (c) The GHC Team, 2007
  *
- * File locking support as required by Haskell 98
+ * File locking support as required by Haskell
  *
  * ---------------------------------------------------------------------------*/
  
+#include "PosixSource.h"
 #include "Rts.h"
-#include "Hash.h"
+
 #include "FileLock.h"
+#include "Hash.h"
 #include "RtsUtils.h"
-#include "OSThreads.h"
 
-#include <unistd.h>
+#include <sys/types.h>
 #include <sys/stat.h>
+#include <unistd.h>
 #include <errno.h>
 
 typedef struct {