type (+'a, 'prefix, 'params, 'query, 'input, 'output, 'error) service =
('a, 'prefix, 'params, 'query, 'input, 'output, 'error) t constraint 'a = [< Resto.meth ]val meth :
([< Resto.meth ] as 'a, 'prefix, 'params, 'query, 'input, 'output, 'error)
service ->
'aval query :
([< Resto.meth ], 'prefix, 'params, 'query, 'input, 'output, 'error) service ->
'query Resto.Query.ttype !'a input = 'a Resto.MakeService(Tezos_rpc.RPC_encoding).input = | No_input : unit input| Input : 'input Tezos_rpc.RPC_encoding.t -> 'input inputval output_encoding :
([< Resto.meth ], 'prefix, 'params, 'query, 'input, 'output, 'error) service ->
'output Tezos_rpc.RPC_encoding.tval error_encoding :
([< Resto.meth ], 'prefix, 'params, 'query, 'input, 'output, 'error) service ->
'error Tezos_rpc.RPC_encoding.tval get_service :
?description:string ->
query:'query Resto.Query.t ->
output:'output Tezos_rpc.RPC_encoding.t ->
error:'error Tezos_rpc.RPC_encoding.t ->
('prefix, 'params) Resto.Path.t ->
([ `GET ], 'prefix, 'params, 'query, unit, 'output, 'error) serviceval post_service :
?description:string ->
query:'query Resto.Query.t ->
input:'input Tezos_rpc.RPC_encoding.t ->
output:'output Tezos_rpc.RPC_encoding.t ->
error:'error Tezos_rpc.RPC_encoding.t ->
('prefix, 'params) Resto.Path.t ->
([ `POST ], 'prefix, 'params, 'query, 'input, 'output, 'error) serviceval delete_service :
?description:string ->
query:'query Resto.Query.t ->
output:'output Tezos_rpc.RPC_encoding.t ->
error:'error Tezos_rpc.RPC_encoding.t ->
('prefix, 'params) Resto.Path.t ->
([ `DELETE ], 'prefix, 'params, 'query, unit, 'output, 'error) serviceval patch_service :
?description:string ->
query:'query Resto.Query.t ->
input:'input Tezos_rpc.RPC_encoding.t ->
output:'output Tezos_rpc.RPC_encoding.t ->
error:'error Tezos_rpc.RPC_encoding.t ->
('prefix, 'params) Resto.Path.t ->
([ `PATCH ], 'prefix, 'params, 'query, 'input, 'output, 'error) serviceval put_service :
?description:string ->
query:'query Resto.Query.t ->
input:'input Tezos_rpc.RPC_encoding.t ->
output:'output Tezos_rpc.RPC_encoding.t ->
error:'error Tezos_rpc.RPC_encoding.t ->
('prefix, 'params) Resto.Path.t ->
([ `PUT ], 'prefix, 'params, 'query, 'input, 'output, 'error) servicetype ('prefix, 'params, 'error) description_service =
([ `GET ],
'prefix,
'params * string list,
Resto.Description.request,
unit,
Tezos_rpc.RPC_encoding.schema Resto.Description.directory,
'error)
serviceval description_service :
?description:string ->
'error Tezos_rpc.RPC_encoding.t ->
('prefix, 'params) Resto.Path.t ->
('prefix, 'params, 'error) description_servicetype !'input request = 'input Resto.MakeService(Tezos_rpc.RPC_encoding).request =
{meth : Resto.meth;uri : Uri.t;input : 'input input;}module Internal : sig ... end