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