module Pipe_rpc: sig .. end
type ('query, 'response, 'error) t 
module Id: sig .. end
val create : name:string ->
       version:int ->
       bin_query:'query Bin_prot.Type_class.t ->
       bin_response:'response Bin_prot.Type_class.t ->
       bin_error:'error Bin_prot.Type_class.t ->
       ('query, 'response, 'error) t
val implement : ('query, 'response, 'error) t ->
       ('connection_state ->
        'query ->
        aborted:unit Import.Deferred.t ->
        ('response Import.Pipe.Reader.t, 'error) Core.Std.Result.t Import.Deferred.t) ->
       'connection_state Rpc.Implementation.t
val dispatch : ('query, 'response, 'error) t ->
       Rpc.Connection.t ->
       'query ->
       ('response Import.Pipe.Reader.t * Id.t, 'error)
       Core.Std.Result.t Core.Std.Or_error.t Import.Deferred.t
val dispatch_exn : ('query, 'response, 'error) t ->
       Rpc.Connection.t ->
       'query ->
       ('response Import.Pipe.Reader.t * Id.t) Import.Deferred.t
val abort : ('a, 'b, 'c) t -> Rpc.Connection.t -> Id.t -> unit
val name : ('a, 'b, 'c) t -> string