module PM_suspended: sig .. end
sig
end
type t = [ `Disk | `Memory | `Unknown of int ]
[ `Disk | `Memory | `Unknown of int ]
val to_string : t -> string
t -> string