From: Richard W.M. Jones <rjones@redhat.com>
Date: Sat, 30 Aug 2014 18:10:19 +0000 (+0100)
Subject: Use C99 standard int64_t instead of OCaml defined (and soon to go) int64.
X-Git-Url: http://git.annexia.org/?a=commitdiff_plain;h=21ac993da0a187821e812fe7b5b31a426121a546;p=ocaml-libvirt.git

Use C99 standard int64_t instead of OCaml defined (and soon to go) int64.
---

diff --git a/libvirt/libvirt_c_oneoffs.c b/libvirt/libvirt_c_oneoffs.c
index 3bb572f..06b3852 100644
--- a/libvirt/libvirt_c_oneoffs.c
+++ b/libvirt/libvirt_c_oneoffs.c
@@ -140,7 +140,7 @@ ocaml_libvirt_connect_node_get_free_memory (value connv)
   NONBLOCKING (r = virNodeGetFreeMemory (conn));
   CHECK_ERROR (r == 0, conn, "virNodeGetFreeMemory");
 
-  rv = caml_copy_int64 ((int64) r);
+  rv = caml_copy_int64 ((int64_t) r);
   CAMLreturn (rv);
 }
 
@@ -161,7 +161,7 @@ ocaml_libvirt_connect_node_get_cells_free_memory (value connv,
 
   rv = caml_alloc (r, 0);
   for (i = 0; i < r; ++i) {
-    iv = caml_copy_int64 ((int64) freemems[i]);
+    iv = caml_copy_int64 ((int64_t) freemems[i]);
     Store_field (rv, i, iv);
   }