sig
  type t = Ecore.timer
  val add : float -> Ecore.task_cb -> Ecore.timer
  val delay : Ecore_timer.t -> float -> unit
end