include sig ... end
val setperms : handle -> string -> Xs_protocol.ACL.t -> unit Lwt.tval watch : handle -> string -> Xs_protocol.Token.t -> unit Lwt.tval unwatch : handle -> string -> Xs_protocol.Token.t -> unit Lwt.tXsinclude sig ... endval setperms : handle -> string -> Xs_protocol.ACL.t -> unit Lwt.tval watch : handle -> string -> Xs_protocol.Token.t -> unit Lwt.tval unwatch : handle -> string -> Xs_protocol.Token.t -> unit Lwt.t