sig
  type t
  val set_exn_handler : (exn -> unit) -> unit
  val create : int -> (unit -> unit) -> Uwt_timeout.t
  val start : Uwt_timeout.t -> unit
  val stop : Uwt_timeout.t -> unit
  val change : Uwt_timeout.t -> int -> unit
end