1 (* 'df' command for virtual domains.
4 * Support for LVM2 PVs.
9 (* Int64 operators for convenience. *)
12 let ( *^ ) = Int64.mul
15 let probe_lvm2 target part_type fd start size =
16 Virt_df.ProbeFailed "LVM2 not supported yet"
18 (* Register with main code. *)
21 [ 0x8e ] (* Partition type. *)