X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=ocaml%2Fguestfs_c.h;h=b4a766177ea37d83c01a52153f5670f81e319293;hp=3da41d05f814a286c6768c6efbd01305e42905c8;hb=6279c4bbf9cbbe66917ce9ffa4b98eca9040bcd9;hpb=13339826ea01f8dbd581b5d2544e7692171cf386;ds=sidebyside diff --git a/ocaml/guestfs_c.h b/ocaml/guestfs_c.h index 3da41d0..b4a7661 100644 --- a/ocaml/guestfs_c.h +++ b/ocaml/guestfs_c.h @@ -22,5 +22,7 @@ #define Guestfs_val(v) (*((guestfs_h **)Data_custom_val(v))) extern void ocaml_guestfs_raise_error (guestfs_h *g, const char *func) Noreturn; +extern char **ocaml_guestfs_strings_val (guestfs_h *g, value sv); +extern void ocaml_guestfs_free_strings (char **r); #endif /* GUESTFS_OCAML_C_H */