Dump_files (flexmasa.Flexmasa.Dump

type t = private {

mutable trees : (Internal_pervasives.string * Internal_pervasives.string * (Internal_pervasives.string * Internal_pervasives.string) Internal_pervasives.list) Internal_pervasives.list;

}

val make : Internal_pervasives.unit -> t

val write : 
  < application_name : Internal_pervasives.string
    ; dump_files : t
    ; paths : Paths.t
    ; runner : Running_processes.State.t.. > ->
  name:Internal_pervasives.string ->
  path:Internal_pervasives.string ->
  (Internal_pervasives.string * Internal_pervasives.string)
    Internal_pervasives.list ->
  (Internal_pervasives.unit,
    [> Internal_pervasives.System_error.t
    | Internal_pervasives.Process_result.Error.t ])
    Internal_pervasives.Asynchronous_result.t

val pp : t Fmt.t