module State : sig ... end
type 'a t
=
{
mutable state : State.t; |
observing : 'a Node.t; |
mutable on_update_handlers : 'a Incremental_kernel__.On_update_handler.t list; |
mutable prev_in_all : Packed_internal_observer.t Incremental_kernel__.Uopt.t; |
mutable next_in_all : Packed_internal_observer.t Incremental_kernel__.Uopt.t; |
mutable prev_in_observing : 'a t Incremental_kernel__.Uopt.t; |
mutable next_in_observing : 'a t Incremental_kernel__.Uopt.t; |
}