module Block_job:sig
..end
typety =
[ `Commit | `Copy | `KnownUnknown | `Pull | `Unknown of int ]
typestatus =
[ `Cancelled | `Completed | `Failed | `Ready | `Unknown of int ]
type
t = {
|
disk : |
(* | fully-qualified name of the affected disk | *) |
|
ty : |
(* | type of block job | *) |
|
status : |
(* | final status of the operation | *) |
}
val to_string : t -> string