Module Expert.Node

type 'a t = ( 'a, state_witness ) Incremental.Expert.Node.t
val sexp_of_t : ( 'a -> Ppx_sexp_conv_lib.Sexp.t ) -> 'a t -> Ppx_sexp_conv_lib.Sexp.t
val create : ?on_observability_change:( is_now_observable:bool -> unit ) -> ( unit -> 'a ) -> 'a t
val watch : 'a t -> 'a t
val make_stale : 'a t -> unit
val invalidate : 'a t -> unit
val add_dependency : 'a t -> 'b Dependency.t -> unit
val remove_dependency : 'a t -> 'b Dependency.t -> unit