Module Private.EnvironmentSource

type t
val empty : t
val add_exn : t -> key:'a Core.Type_equal.Id.t -> data:'a Ui_incr.t -> t
Sourceval add_overwriting : t -> key:'a Core.Type_equal.Id.t -> data:'a Ui_incr.t -> t
val find : t -> 'a Core.Type_equal.Id.t -> 'a Ui_incr.t option