Source file `contract_schedule.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
let name = "schedule"

module type Sig = sig
  (** [schedule t] runs a schedule [t].

      Call the returned function to cancel a schedule. *)
  val schedule : Core_schedule.t -> Core_schedule.stop_schedule

  val register
    :  ?schedules:Core_schedule.t list
    -> unit
    -> Core_container.Service.t

  include Core_container.Service.Sig
end