ocaml: Fix some unused parameter warnings in OCaml bindings.

[libguestfs.git] / ocaml / guestfs_c.c

diff --git a/ocaml/guestfs_c.c b/ocaml/guestfs_c.c
index 7648ba9..1324fb6 100644 (file)
--- a/ocaml/guestfs_c.c
+++ b/ocaml/guestfs_c.c
@@ -225,7 +225,7 @@ clear_progress_callback (guestfs_h *g)
 }
 
 static void
-progress_callback (guestfs_h *g, void *root,
+progress_callback (guestfs_h *g ATTRIBUTE_UNUSED, void *root,
                    int proc_nr, int serial, uint64_t position, uint64_t total)
 {
   CAMLparam0 ();