val debug : ('a, unit, string, unit) Stdlib.format4 -> 'aval error : ('a, unit, string, unit) Stdlib.format4 -> 'aval store : Store.tmodule type TRANSPORT = sig ... endXenstore_server.Xs_serverval debug : ('a, unit, string, unit) Stdlib.format4 -> 'aval error : ('a, unit, string, unit) Stdlib.format4 -> 'aval store : Store.tmodule type TRANSPORT = sig ... end