/* -----------------------------------------------------------------------------
*
- * (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);