Module Lock

module Lock: sig .. end

type t 
val make_reentrant : bool -> t
val lock : t -> unit
val lock_interruptibly : t -> unit
val new_condition : t -> Condition.t
val try_lock : t -> bool
val try_lock_time : t -> int64 -> TimeUnit.t -> bool
val unlock : t -> unit