module Pipe_rpc:sig
..end
module type S =sig
..end
module Make(
Model
:
sig
val name :string
type
query
type
response
type
error
end
)
:sig
..end
dispatch_multi
in terms of that model and a mechanism
for registering the individual versions that dispatch_multi
knows about.