From: Michael Young Date: Sun, 8 Feb 2015 15:54:23 +0000 (+0000) Subject: tools/ocaml: remove uint32 use added by 674ad2b X-Git-Url: http://xenbits.xensource.com/gitweb?a=commitdiff_plain;h=2b4778b3f35dd67b12ed9dad1c65b28e71bbe9d1;p=people%2Fgdunlap%2Fxen.git tools/ocaml: remove uint32 use added by 674ad2b In 674ad2b (xenstore: extend the xenstore ring with a 'closing' signal) two uses of uint32 are added to tools/ocaml/libs/xb/xs_ring_stubs.c . As of ocaml 4.03.0+dev the uint32 type is no longer supported. This patch replaces the uses of uint32 with uint32_t . Signed-off-by: Michael Young Acked-by: David Scott --- diff --git a/tools/ocaml/libs/xb/xs_ring_stubs.c b/tools/ocaml/libs/xb/xs_ring_stubs.c index fc9b0c53c4..fd561a2117 100644 --- a/tools/ocaml/libs/xb/xs_ring_stubs.c +++ b/tools/ocaml/libs/xb/xs_ring_stubs.c @@ -55,7 +55,7 @@ CAMLprim value ml_interface_read(value ml_interface, cons = *(volatile uint32_t*)&intf->req_cons; prod = *(volatile uint32_t*)&intf->req_prod; - connection = *(volatile uint32*)&intf->connection; + connection = *(volatile uint32_t*)&intf->connection; if (connection != XENSTORE_CONNECTED) caml_raise_constant(*caml_named_value("Xb.Reconnect")); @@ -105,7 +105,7 @@ CAMLprim value ml_interface_write(value ml_interface, cons = *(volatile uint32_t*)&intf->rsp_cons; prod = *(volatile uint32_t*)&intf->rsp_prod; - connection = *(volatile uint32*)&intf->connection; + connection = *(volatile uint32_t*)&intf->connection; if (connection != XENSTORE_CONNECTED) caml_raise_constant(*caml_named_value("Xb.Reconnect"));