jon.recoil.org

Module Eio_mock.Clock

A mock Eio.Time clock for testing timeouts.

Note that Backend.run_full provides mock clocks that advance automatically when there is nothing left to do.

type 'time ty = [
  1. | `Mock
  2. | 'time Eio.Time.clock_ty
]
module type S = sig ... end
include Eio_mock.Clock.S with type time := float
val make : unit -> Eio_mock.Clock.t

make () is a new clock.

The time is initially set to 0.0 and doesn't change except when you call advance or set_time.

val advance : Eio_mock.Clock.t -> unit

advance t sets the time to the next scheduled event (adding any due fibers to the run queue).

val try_advance : Eio_mock.Clock.t -> bool

Like advance, but returns false instead of raising an exception.

val set_time : Eio_mock.Clock.t -> float -> unit

set_time t time sets the time to time (adding any due fibers to the run queue).

module Mono : Eio_mock.Clock.S with type time := Mtime.t