1 /* -----------------------------------------------------------------------------
3 * (c) The GHC Team, 2007
5 * File locking support as required by Haskell 98
7 * ---------------------------------------------------------------------------*/
10 #define RTS_FILELOCK_H
12 #ifdef HAVE_SYS_TYPES_H
13 #include <sys/types.h>
16 int lockFile(int fd, dev_t dev, ino_t ino, int for_writing);
17 int unlockFile(int fd);
19 #endif /* RTS_FILELOCK_H */