Xhr
val get : ?error:(int -> unit) -> string -> string -> (string -> unit) -> unit
val post : ?content_type:string -> ?content:string -> ?error:(int -> unit) -> string -> string -> (string -> unit) -> unit