git.annexia.org
/
ocaml-libvirt.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Use -g -warn-error.
[ocaml-libvirt.git]
/
examples
/
get_cpu_stats.ml
diff --git
a/examples/get_cpu_stats.ml
b/examples/get_cpu_stats.ml
index
d7a8d0c
..
814c85e
100644
(file)
--- a/
examples/get_cpu_stats.ml
+++ b/
examples/get_cpu_stats.ml
@@
-19,9
+19,11
@@
let () =
let conn = C.connect_readonly () in
let conn = C.connect_readonly () in
+ (*
let nr_pcpus =
let info = C.get_node_info conn in
C.maxcpus_of_node_info info in
let nr_pcpus =
let info = C.get_node_info conn in
C.maxcpus_of_node_info info in
+ *)
let stats =
let dom = D.lookup_by_name conn domname in
let stats =
let dom = D.lookup_by_name conn domname in