[Libguestfs] [PATCH] virt-rescue rewrite in OCaml