git.annexia.org
/
ocaml-libvirt.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
7592a3c
)
Use C99 standard int64_t instead of OCaml defined (and soon to go) int64.
author
Richard W.M. Jones
<rjones@redhat.com>
Sat, 30 Aug 2014 18:10:19 +0000
(19:10 +0100)
committer
Richard W.M. Jones
<rjones@redhat.com>
Sat, 30 Aug 2014 18:10:19 +0000
(19:10 +0100)
libvirt/libvirt_c_oneoffs.c
patch
|
blob
|
history
diff --git
a/libvirt/libvirt_c_oneoffs.c
b/libvirt/libvirt_c_oneoffs.c
index
3bb572f
..
06b3852
100644
(file)
--- 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);
}