sig type ('a, 'b) t val create : ('a -> 'b Deferred.t) -> ('a, 'b) Throttle.Job.t val result : ('a, 'b) Throttle.Job.t -> 'b Throttle.outcome Deferred.t end