git.annexia.org
/
virt-top.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Remove dependency on ocaml-extlib
[virt-top.git]
/
src
/
stream_output.ml
diff --git
a/src/stream_output.ml
b/src/stream_output.ml
index
c3af99b
..
2b9e087
100644
(file)
--- a/
src/stream_output.ml
+++ b/
src/stream_output.ml
@@
-20,7
+20,6
@@
(* [--stream] mode output functions. *)
open Printf
(* [--stream] mode output functions. *)
open Printf
-open ExtList
open Utils
open Collect
open Utils
open Collect
@@
-54,7
+53,7
@@
let append_stream (_, _, _, _, _, node_info, hostname, _) (* setup *)
| Inactive, Inactive -> 0)
in
let cmp (name1, dom1) (name2, dom2) = compare(dom1, dom2) in
| Inactive, Inactive -> 0)
in
let cmp (name1, dom1) (name2, dom2) = compare(dom1, dom2) in
- List.sort
~
cmp doms in
+ List.sort cmp doms in
(*Print domains *)
let dump_domain = fun name rd
-> begin
(*Print domains *)
let dump_domain = fun name rd
-> begin