aboutsummaryrefslogtreecommitdiffstats
path: root/tools/ocaml
diff options
context:
space:
mode:
authorIan Campbell <ian.campbell@citrix.com>2012-01-31 16:34:39 +0000
committerIan Campbell <ian.campbell@citrix.com>2012-01-31 16:34:39 +0000
commite0dfff8c14c05594d1a0c2216f906653fcf225de (patch)
treeb9a1c527d16e222f856b5538e796689c2f736b5e /tools/ocaml
parent427a35b7f1403c216ce73c68438f0081db1fd0d4 (diff)
downloadxen-e0dfff8c14c05594d1a0c2216f906653fcf225de.tar.gz
xen-e0dfff8c14c05594d1a0c2216f906653fcf225de.tar.bz2
xen-e0dfff8c14c05594d1a0c2216f906653fcf225de.zip
ocaml: Topology.get returns an array not a single element.
The stub implementation appears to already be correct. Signed-off-by: Ian Campbell <ian.campbell@citrix.com> Acked-by: Ian Jackson <Ian.Jackson@eu.citrix.com> Committed-by: Ian Jackson <Ian.Jackson@eu.citrix.com>
Diffstat (limited to 'tools/ocaml')
-rw-r--r--tools/ocaml/libs/xl/xenlight.ml.in2
-rw-r--r--tools/ocaml/libs/xl/xenlight.mli.in2
2 files changed, 2 insertions, 2 deletions
diff --git a/tools/ocaml/libs/xl/xenlight.ml.in b/tools/ocaml/libs/xl/xenlight.ml.in
index bf7a45080c..162b4a96bb 100644
--- a/tools/ocaml/libs/xl/xenlight.ml.in
+++ b/tools/ocaml/libs/xl/xenlight.ml.in
@@ -26,7 +26,7 @@ module Topologyinfo = struct
socket : int;
node : int;
}
- external get : unit -> t = "stub_xl_topologyinfo"
+ external get : unit -> t array = "stub_xl_topologyinfo"
end
diff --git a/tools/ocaml/libs/xl/xenlight.mli.in b/tools/ocaml/libs/xl/xenlight.mli.in
index 7006b2a145..ea919a7a00 100644
--- a/tools/ocaml/libs/xl/xenlight.mli.in
+++ b/tools/ocaml/libs/xl/xenlight.mli.in
@@ -26,7 +26,7 @@ module Topologyinfo : sig
socket : int;
node : int;
}
- external get : unit -> t = "stub_xl_topologyinfo"
+ external get : unit -> t array = "stub_xl_topologyinfo"
end
external send_trigger : domid -> trigger -> int -> unit = "stub_xl_send_trigger"