36 lines
1.1 KiB
Diff
36 lines
1.1 KiB
Diff
From 21ac993da0a187821e812fe7b5b31a426121a546 Mon Sep 17 00:00:00 2001
|
|
From: "Richard W.M. Jones" <rjones@redhat.com>
|
|
Date: Sat, 30 Aug 2014 19:10:19 +0100
|
|
Subject: [PATCH] Use C99 standard int64_t instead of OCaml defined (and soon
|
|
to go) int64.
|
|
|
|
---
|
|
libvirt/libvirt_c_oneoffs.c | 4 ++--
|
|
1 file changed, 2 insertions(+), 2 deletions(-)
|
|
|
|
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);
|
|
}
|
|
|
|
--
|
|
2.0.4
|
|
|