X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=virt-ctrl%2Fvc_mainwindow.mli;h=39439e97fc7d28e630eeb5c80deccbe2e0f26946;hb=10d89a4a52b85803c85e14a1a71737ba20dea3d4;hp=fb7f1527cd0e4b8b6035dd1ab489a0e4a184349e;hpb=474e8b8e2e98b61d5d01a58f843b9338754ecf2f;p=virt-top.git diff --git a/virt-ctrl/vc_mainwindow.mli b/virt-ctrl/vc_mainwindow.mli index fb7f152..39439e9 100644 --- a/virt-ctrl/vc_mainwindow.mli +++ b/virt-ctrl/vc_mainwindow.mli @@ -22,8 +22,10 @@ (** This function creates the main window. You have to pass in callback functions to wire everything up. *) -val make : open_connection:(unit -> unit) -> - start_domain:(GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit) -> - pause_domain:(GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit) -> - resume_domain:(GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit) -> - shutdown_domain:(GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit) -> unit +val make : + start_domain:Vc_domain_ops.dops_callback_fn -> + pause_domain:Vc_domain_ops.dops_callback_fn -> + resume_domain:Vc_domain_ops.dops_callback_fn -> + shutdown_domain:Vc_domain_ops.dops_callback_fn -> + open_domain_details:Vc_domain_ops.dops_callback_fn -> + unit