Source file ui_incr.ml

1
2
3
4
5
6
7
8
9
10
open! Core
module Incr = Incremental.Make ()

(* This is the default clock for running clients, but bonsai tests have their
   own separate clocks *)
let clock = Incr.Clock.create ~start:(Time_ns.now ()) ()

include Incr
module Map = Incr_map.Make (Incr)
module Select = Incr_select.Make (Incr)