X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=ocaml%2Fguestfs.ml;h=99d59037a38885b0142556113f6323ff379b8885;hb=01b20efdf43b87981c6b9899122e22ef307ee52f;hp=1cfe921067bcbca0ebe8dc16f3aa425a2da843fc;hpb=43db06ea892cc157324a6b837ca430607441c509;p=libguestfs.git

diff --git a/ocaml/guestfs.ml b/ocaml/guestfs.ml
index 1cfe921..99d5903 100644
--- a/ocaml/guestfs.ml
+++ b/ocaml/guestfs.ml
@@ -208,3 +208,24 @@ external tar_in : t -> string -> string -> unit = "ocaml_guestfs_tar_in"
 external tar_out : t -> string -> string -> unit = "ocaml_guestfs_tar_out"
 external tgz_in : t -> string -> string -> unit = "ocaml_guestfs_tgz_in"
 external tgz_out : t -> string -> string -> unit = "ocaml_guestfs_tgz_out"
+external mount_ro : t -> string -> string -> unit = "ocaml_guestfs_mount_ro"
+external mount_options : t -> string -> string -> string -> unit = "ocaml_guestfs_mount_options"
+external mount_vfs : t -> string -> string -> string -> string -> unit = "ocaml_guestfs_mount_vfs"
+external debug : t -> string -> string array -> string = "ocaml_guestfs_debug"
+external lvremove : t -> string -> unit = "ocaml_guestfs_lvremove"
+external vgremove : t -> string -> unit = "ocaml_guestfs_vgremove"
+external pvremove : t -> string -> unit = "ocaml_guestfs_pvremove"
+external set_e2label : t -> string -> string -> unit = "ocaml_guestfs_set_e2label"
+external get_e2label : t -> string -> string = "ocaml_guestfs_get_e2label"
+external set_e2uuid : t -> string -> string -> unit = "ocaml_guestfs_set_e2uuid"
+external get_e2uuid : t -> string -> string = "ocaml_guestfs_get_e2uuid"
+external fsck : t -> string -> string -> int = "ocaml_guestfs_fsck"
+external zero : t -> string -> unit = "ocaml_guestfs_zero"
+external grub_install : t -> string -> string -> unit = "ocaml_guestfs_grub_install"
+external cp : t -> string -> string -> unit = "ocaml_guestfs_cp"
+external cp_a : t -> string -> string -> unit = "ocaml_guestfs_cp_a"
+external mv : t -> string -> string -> unit = "ocaml_guestfs_mv"
+external drop_caches : t -> int -> unit = "ocaml_guestfs_drop_caches"
+external dmesg : t -> string = "ocaml_guestfs_dmesg"
+external ping_daemon : t -> unit = "ocaml_guestfs_ping_daemon"
+external equal : t -> string -> string -> bool = "ocaml_guestfs_equal"