sig type t val lock_shared : Core_unix.Flock_command.t val lock_exclusive : Core_unix.Flock_command.t val unlock : Core_unix.Flock_command.t end