Traffic_generation.Random
val run :
< application_name : Internal_pervasives.string
; console : Console.t
; operations_log : Log_recorder.Operations.t
; env_config : Environment_configuration.t
; paths : Paths.t
; runner : Running_processes.State.t
; test_baking : Internal_pervasives.bool.. > ->
protocol:Mavryk_protocol.t ->
nodes:Mavryk_node.t Internal_pervasives.list ->
clients:Mavryk_client.Keyed.t Internal_pervasives.list ->
until_level:Internal_pervasives.int ->
[> `Any ] ->
(Internal_pervasives.unit,
[> `Command_line of Internal_pervasives.string
| Internal_pervasives.System_error.t
| Internal_pervasives.Process_result.Error.t ])
Internal_pervasives.Asynchronous_result.t