Module Qcow_locks
- val make : unit -> t
- Create a set of locks 
- val unlock : lock -> unit
- unlock lockreleases the lock. Note releasing the same lock more than once will trigger a runtime failure.
module Client : sig ... endmodule Read : sig ... endmodule Write : sig ... end- val with_metadata_lock : t -> (unit -> 'a Lwt.t) -> 'a Lwt.t
- with_metadata_lock t fexecutes- f ()with the global metadata lock held. This prevents metadata blocks from moving while they're being used.
module Debug : sig ... end