Rpc_async.Ttype ('a, 'b) resultb = ( 'a, 'b ) Result.t boxtype rpcfn = Rpc.call -> Rpc.response Async.Deferred.tval lift : ( 'a -> 'b Async.Deferred.t ) -> 'a -> 'b boxval return : 'a -> 'a boxval get : 'a box -> 'a Async.Deferred.tval (!@) : 'a box -> 'a Async.Deferred.tval put : 'a Async.Deferred.t -> 'a boxval (~@) : 'a Async.Deferred.t -> 'a box