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