X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=ocaml%2Fguestfs_c.h;h=b4a766177ea37d83c01a52153f5670f81e319293;hp=4fb81881265f02f59c1b77fcf1f10024589a0675;hb=c6b8db6493dd633bf48b13daf72cdc9c078b5f9a;hpb=b4d2a01828e5de85e5eee3631f7fe3925a0312ca

diff --git a/ocaml/guestfs_c.h b/ocaml/guestfs_c.h
index 4fb8188..b4a7661 100644
--- a/ocaml/guestfs_c.h
+++ b/ocaml/guestfs_c.h
@@ -22,7 +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 (value sv);
+extern char **ocaml_guestfs_strings_val (guestfs_h *g, value sv);
 extern void ocaml_guestfs_free_strings (char **r);
 
 #endif /* GUESTFS_OCAML_C_H */