Source file `data.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
module type S = sig
  type ty
  type 'a io
  type t = ty [@@deriving sexp]

  val make : ty -> t
  val to_value : t -> Botodata.value io
  val to_query : t -> Client.Query.t io
  val to_header : t -> string io
  val of_xml : Xml.t -> t
  val of_json : Json.t -> t
  val to_json : t -> Json.t io
  val of_string : string -> t
end