Module Computation_watcher.Node

type t =
  1. | Named_or_incr : {
    1. source_code_positions : Source_code_positions.finalized;
    2. incr_info : Core.Info.t option;
    3. kind : [ `Named | `Incr ];
    4. config : Config.t;
    } -> t
  2. | State_machine_like : {
    1. source_code_positions : Source_code_positions.finalized;
    2. model_before : 'a;
    3. model_after : 'a;
    4. action : 'b option;
    5. sexp_of_model : 'a -> Core.Sexp.t;
    6. sexp_of_action : ('b -> Core.Sexp.t) option;
    7. kind : [ `State_machine0 | `State_machine1 | `Wrap ];
    8. config : Config.t;
    } -> t
  3. | Reset : {
    1. source_code_positions : Source_code_positions.finalized;
    2. model_before : 'a;
    3. model_after : 'a;
    4. sexp_of_model : 'a -> Core.Sexp.t;
    5. kind : [ `State_machine0 | `State_machine1 | `Wrap ];
    6. config : Config.t;
    } -> t
val to_string : t -> string
val log : t -> unit