diff options
author | Richard Jones <rjones@redhat.com> | 2009-04-08 20:26:35 +0100 |
---|---|---|
committer | Richard Jones <rjones@redhat.com> | 2009-04-08 20:26:35 +0100 |
commit | 94050e0344685b6916e21581e618ad3e85795008 (patch) | |
tree | aa86daf806029bded8a9e88b18be34633d403664 /ocaml/guestfs.ml | |
parent | b5ff6816face6f8c1700d4f1df752c710620ff95 (diff) | |
download | libguestfs-94050e0344685b6916e21581e618ad3e85795008.tar.gz libguestfs-94050e0344685b6916e21581e618ad3e85795008.tar.xz libguestfs-94050e0344685b6916e21581e618ad3e85795008.zip |
Many non-daemon functions are now auto-generated.
Diffstat (limited to 'ocaml/guestfs.ml')
-rw-r--r-- | ocaml/guestfs.ml | 40 |
1 files changed, 20 insertions, 20 deletions
diff --git a/ocaml/guestfs.ml b/ocaml/guestfs.ml index ba6f0d64..dd60c53d 100644 --- a/ocaml/guestfs.ml +++ b/ocaml/guestfs.ml @@ -23,18 +23,6 @@ type t exception Error of string external create : unit -> t = "ocaml_guestfs_create" external close : t -> unit = "ocaml_guestfs_create" -external launch : t -> unit = "ocaml_guestfs_launch" -external wait_ready : t -> unit = "ocaml_guestfs_wait_ready" -external kill_subprocess : t -> unit = "ocaml_guestfs_kill_subprocess" -external add_drive : t -> string -> unit = "ocaml_guestfs_add_drive" -external add_cdrom : t -> string -> unit = "ocaml_guestfs_add_cdrom" -external config : t -> string -> string option -> unit = "ocaml_guestfs_config" -external set_path : t -> string option -> unit = "ocaml_guestfs_set_path" -external get_path : t -> string = "ocaml_guestfs_get_path" -external set_autosync : t -> bool -> unit = "ocaml_guestfs_set_autosync" -external get_autosync : t -> bool = "ocaml_guestfs_get_autosync" -external set_verbose : t -> bool -> unit = "ocaml_guestfs_set_verbose" -external get_verbose : t -> bool = "ocaml_guestfs_get_verbose" type lvm_pv = { pv_name : string; @@ -94,17 +82,29 @@ type lvm_lv = { modules : string; } +external launch : t -> unit = "ocaml_guestfs_launch" +external wait_ready : t -> unit = "ocaml_guestfs_wait_ready" +external kill_subprocess : t -> unit = "ocaml_guestfs_kill_subprocess" +external add_drive : t -> string -> unit = "ocaml_guestfs_add_drive" +external add_cdrom : t -> string -> unit = "ocaml_guestfs_add_cdrom" +external config : t -> string -> string option -> unit = "ocaml_guestfs_config" +external set_path : t -> string -> unit = "ocaml_guestfs_set_path" +external get_path : t -> string = "ocaml_guestfs_get_path" +external set_autosync : t -> bool -> unit = "ocaml_guestfs_set_autosync" +external get_autosync : t -> bool = "ocaml_guestfs_get_autosync" +external set_verbose : t -> bool -> unit = "ocaml_guestfs_set_verbose" +external get_verbose : t -> bool = "ocaml_guestfs_get_verbose" +external mount : t -> string -> string -> unit = "ocaml_guestfs_mount" +external sync : t -> unit = "ocaml_guestfs_sync" +external touch : t -> string -> unit = "ocaml_guestfs_touch" external cat : t -> string -> string = "ocaml_guestfs_cat" -external list_devices : t -> string list = "ocaml_guestfs_list_devices" -external list_partitions : t -> string list = "ocaml_guestfs_list_partitions" external ll : t -> string -> string = "ocaml_guestfs_ll" external ls : t -> string -> string list = "ocaml_guestfs_ls" -external lvs : t -> string list = "ocaml_guestfs_lvs" -external lvs_full : t -> lvm_lv list = "ocaml_guestfs_lvs_full" -external mount : t -> string -> string -> unit = "ocaml_guestfs_mount" +external list_devices : t -> string list = "ocaml_guestfs_list_devices" +external list_partitions : t -> string list = "ocaml_guestfs_list_partitions" external pvs : t -> string list = "ocaml_guestfs_pvs" -external pvs_full : t -> lvm_pv list = "ocaml_guestfs_pvs_full" -external sync : t -> unit = "ocaml_guestfs_sync" -external touch : t -> string -> unit = "ocaml_guestfs_touch" external vgs : t -> string list = "ocaml_guestfs_vgs" +external lvs : t -> string list = "ocaml_guestfs_lvs" +external pvs_full : t -> lvm_pv list = "ocaml_guestfs_pvs_full" external vgs_full : t -> lvm_vg list = "ocaml_guestfs_vgs_full" +external lvs_full : t -> lvm_lv list = "ocaml_guestfs_lvs_full" |