Remove references to Haskell 98
[ghc-hetmet.git] / includes / rts / FileLock.h
index 9a35ecc..a7d8d3c 100644 (file)
@@ -1,14 +1,23 @@
 /* -----------------------------------------------------------------------------
  *
- * (c) The GHC Team, 2007
+ * (c) The GHC Team, 2007-2009
  *
- * File locking support as required by Haskell 98
+ * File locking support as required by Haskell
+ *
+ * Do not #include this file directly: #include "Rts.h" instead.
+ *
+ * To understand the structure of the RTS headers, see the wiki:
+ *   http://hackage.haskell.org/trac/ghc/wiki/Commentary/SourceTree/Includes
  *
  * ---------------------------------------------------------------------------*/
 
 #ifndef RTS_FILELOCK_H
 #define RTS_FILELOCK_H
 
+#ifdef HAVE_SYS_TYPES_H
+#include <sys/types.h>
+#endif
+
 int  lockFile(int fd, dev_t dev, ino_t ino, int for_writing);
 int  unlockFile(int fd);