Module Incremental__.Snapshot
include module type of sig ... end
type 'a t
= 'a Incremental__Types.Snapshot.t
=
{
main : 'a Incremental__Types.Node.t;
at : Incremental__.Import.Time_ns.t;
before : 'a;
value_at : 'a Incremental__Types.Node.t;
clock : Incremental__Types.Clock.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