Xs_protocol.Response
type payload =
| Read of string
| Directory of string list
| Getperms of ACL.t
| Getdomainpath of string
| Transaction_start of int32
| Write
| Mkdir
| Rm
| Setperms
| Watch
| Unwatch
| Transaction_end
| Debug of string list
| Introduce
| Resume
| Release
| Set_target
| Restrict
| Isintroduced of bool
| Error of string
| Watchevent of string * string
val prettyprint_payload : payload -> string