X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=ocaml%2Fguestfs.ml;h=d218b3e32d5bc8a8ccd06d4c6601fec9c6fdc556;hp=48dae20366225a0db9171b2711df3e0a2f421697;hb=c41fe04a652437c920acb0e820762c53bf44a139;hpb=e2206733d1287f5809dbde954f3eb64420471b0d diff --git a/ocaml/guestfs.ml b/ocaml/guestfs.ml index 48dae20..d218b3e 100644 --- a/ocaml/guestfs.ml +++ b/ocaml/guestfs.ml @@ -115,6 +115,33 @@ type statvfs = { namemax : int64; } +external test0 : t -> string -> string option -> string array -> bool -> int -> string -> string -> unit = "ocaml_guestfs_test0_byte" "ocaml_guestfs_test0" +external test0rint : t -> string -> int = "ocaml_guestfs_test0rint" +external test0rinterr : t -> int = "ocaml_guestfs_test0rinterr" +external test0rint64 : t -> string -> int64 = "ocaml_guestfs_test0rint64" +external test0rint64err : t -> int64 = "ocaml_guestfs_test0rint64err" +external test0rbool : t -> string -> bool = "ocaml_guestfs_test0rbool" +external test0rboolerr : t -> bool = "ocaml_guestfs_test0rboolerr" +external test0rconststring : t -> string -> string = "ocaml_guestfs_test0rconststring" +external test0rconststringerr : t -> string = "ocaml_guestfs_test0rconststringerr" +external test0rstring : t -> string -> string = "ocaml_guestfs_test0rstring" +external test0rstringerr : t -> string = "ocaml_guestfs_test0rstringerr" +external test0rstringlist : t -> string -> string array = "ocaml_guestfs_test0rstringlist" +external test0rstringlisterr : t -> string array = "ocaml_guestfs_test0rstringlisterr" +external test0rintbool : t -> string -> int * bool = "ocaml_guestfs_test0rintbool" +external test0rintboolerr : t -> int * bool = "ocaml_guestfs_test0rintboolerr" +external test0rpvlist : t -> string -> lvm_pv array = "ocaml_guestfs_test0rpvlist" +external test0rpvlisterr : t -> lvm_pv array = "ocaml_guestfs_test0rpvlisterr" +external test0rvglist : t -> string -> lvm_vg array = "ocaml_guestfs_test0rvglist" +external test0rvglisterr : t -> lvm_vg array = "ocaml_guestfs_test0rvglisterr" +external test0rlvlist : t -> string -> lvm_lv array = "ocaml_guestfs_test0rlvlist" +external test0rlvlisterr : t -> lvm_lv array = "ocaml_guestfs_test0rlvlisterr" +external test0rstat : t -> string -> stat = "ocaml_guestfs_test0rstat" +external test0rstaterr : t -> stat = "ocaml_guestfs_test0rstaterr" +external test0rstatvfs : t -> string -> statvfs = "ocaml_guestfs_test0rstatvfs" +external test0rstatvfserr : t -> statvfs = "ocaml_guestfs_test0rstatvfserr" +external test0rhashtable : t -> string -> (string * string) list = "ocaml_guestfs_test0rhashtable" +external test0rhashtableerr : t -> (string * string) list = "ocaml_guestfs_test0rhashtableerr" 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"