ocaml: Fix thread safety of strings in bindings (RHBZ#604691).

[libguestfs.git] / ocaml / guestfs_c.h

diff --git a/ocaml/guestfs_c.h b/ocaml/guestfs_c.h
index cd1d73b..29da053 100644 (file)
--- a/ocaml/guestfs_c.h
+++ b/ocaml/guestfs_c.h
@@ -19,6 +19,8 @@
 #ifndef GUESTFS_OCAML_C_H
 #define GUESTFS_OCAML_C_H
 
+#include "guestfs-internal.h"
+
 #define Guestfs_val(v) (*((guestfs_h **)Data_custom_val(v)))
 extern void ocaml_guestfs_raise_error (guestfs_h *g, const char *func)
   Noreturn;