includes/rts/FileLock.h

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