X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=ocaml%2Fguestfs_c.h;h=a374bf2646459a5b15d1cc5023b9e711a49f1ccc;hb=91ea9c1805112233140a463256c89072121fc182;hp=29da05323dce19103aa53e2ffb53a7cd57eed6ad;hpb=1079f74704a06c06996e547fdecf20a8f92799c6;p=libguestfs.git

diff --git a/ocaml/guestfs_c.h b/ocaml/guestfs_c.h
index 29da053..a374bf2 100644
--- a/ocaml/guestfs_c.h
+++ b/ocaml/guestfs_c.h
@@ -1,5 +1,5 @@
 /* libguestfs
- * Copyright (C) 2009 Red Hat Inc.
+ * Copyright (C) 2009-2011 Red Hat Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public
@@ -29,4 +29,14 @@ extern void ocaml_guestfs_raise_closed (const char *func)
 extern char **ocaml_guestfs_strings_val (guestfs_h *g, value sv);
 extern void ocaml_guestfs_free_strings (char **r);
 
+# ifdef __GNUC__
+# ifndef ATTRIBUTE_UNUSED
+#  define ATTRIBUTE_UNUSED __attribute__((__unused__))
+# endif
+#else
+# ifndef ATTRIBUTE_UNUSED
+#  define ATTRIBUTE_UNUSED
+# endif
+#endif
+
 #endif /* GUESTFS_OCAML_C_H */