Module Compression_main

module Compression_main: sig .. end
Main entry to the story machinery

type secret_log_info 
type secret_parameter 

Build

val init_secret_log_info : unit -> secret_log_info
val build_parameter : called_from:Remanent_parameters_sig.called_from ->
?send_message:(string -> unit) ->
none:bool -> weak:bool -> strong:bool -> secret_parameter
val get_logger : secret_parameter -> Loggers.t
Use

val compress_and_print : secret_parameter ->
dotFormat:Causal.formatCflow ->
?js_interface:Cflow_js_interface.cflow_state Pervasives.ref ->
Model.t -> secret_log_info -> Trace.t -> unit