sig
type secret_log_info
type secret_parameter
val init_secret_log_info : unit -> Compression_main.secret_log_info
val build_parameter :
called_from:Remanent_parameters_sig.called_from ->
none:bool ->
weak:bool -> strong:bool -> Compression_main.secret_parameter
val get_logger : Compression_main.secret_parameter -> Loggers.t
val compress_and_print :
Compression_main.secret_parameter ->
dotFormat:Causal.formatCflow ->
?js_interface:Cflow_js_interface.cflow_state Pervasives.ref ->
Model.t -> Compression_main.secret_log_info -> Trace.t -> unit
end