type t
module Op : sig ... end
module ACL : sig ... end
module Parser : sig ... end
module type IO = sig ... end
exception Unknown_xenstore_operation of int32
exception Response_parser_failed of string
type (!'a, !'b) result =
  1. | Ok of 'a
  2. | Exception of 'b
module PacketStream (IO : IO) : sig ... end
val to_string : t -> string
val get_tid : t -> int32
val get_ty : t -> Op.t
val get_data : t -> string
val get_rid : t -> int32
val create : int32 -> int32 -> Op.t -> string -> t
module Token : sig ... end
module Response : sig ... end
module Request : sig ... end
module Unmarshal : sig ... end
exception Enoent of string
exception Eagain
exception Invalid
exception Error of string
val response : string -> t -> t -> (t -> 'a option) -> 'a
type address =
  1. | Unix of string
  2. | Domain of int
val string_of_address : address -> string
val domain_of_address : address -> int