type('params, 'input, 'output) service =
(unit, 'params, 'input, 'output)Resto_impl.service
Services.
val service :
?description:string ->input:'inputJson_encoding.encoding->output:'outputJson_encoding.encoding->'paramsPath.path->('params, 'input, 'output)service
type json = Json_repr.Ezjsonm.value
val forge_request :
('params, 'input, 'output)service->'params->'input->string list * json
val read_answer :
('params, 'input, 'output)service->json->('output, string)Result.result