Module Incremental__.Join
include module type of sig ... end
type 'a t
= 'a Incremental__Types.Join.t
=
{
main : 'a Incremental__Types.Node.t;
lhs : 'a Incremental__Types.Node.t Incremental__Types.Node.t;
lhs_change : unit Incremental__Types.Node.t;
mutable rhs : 'a Incremental__Types.Node.t Incremental__.Import.Uopt.t;
}
include Core_kernel.Invariant.S1 with type 'a t := 'a t
val invariant : 'a Base__.Invariant_intf.inv -> 'a t Base__.Invariant_intf.inv
include Incremental__.Sexp_of.S1 with type 'a t := 'a t
val sexp_of_t : ('a -> Ppx_sexp_conv_lib.Sexp.t) -> 'a t -> Ppx_sexp_conv_lib.Sexp.t