diff options
| author | Richard Jones <rjones@redhat.com> | 2009-04-08 22:52:11 +0100 |
|---|---|---|
| committer | Richard Jones <rjones@redhat.com> | 2009-04-08 22:52:11 +0100 |
| commit | 13339826ea01f8dbd581b5d2544e7692171cf386 (patch) | |
| tree | d231c776846060f93293d6ee1352d912a2f5d237 /ocaml/guestfs_c.h | |
| parent | 94050e0344685b6916e21581e618ad3e85795008 (diff) | |
| download | libguestfs-13339826ea01f8dbd581b5d2544e7692171cf386.tar.gz libguestfs-13339826ea01f8dbd581b5d2544e7692171cf386.tar.xz libguestfs-13339826ea01f8dbd581b5d2544e7692171cf386.zip | |
OCaml bindings compile.
Diffstat (limited to 'ocaml/guestfs_c.h')
| -rw-r--r-- | ocaml/guestfs_c.h | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ocaml/guestfs_c.h b/ocaml/guestfs_c.h index 52b5aeaa..3da41d05 100644 --- a/ocaml/guestfs_c.h +++ b/ocaml/guestfs_c.h @@ -19,6 +19,8 @@ #ifndef GUESTFS_OCAML_C_H #define GUESTFS_OCAML_C_H - +#define Guestfs_val(v) (*((guestfs_h **)Data_custom_val(v))) +extern void ocaml_guestfs_raise_error (guestfs_h *g, const char *func) + Noreturn; #endif /* GUESTFS_OCAML_C_H */ |