Module Flexmasa.Command_daemons_protocol_change

val failf : ('a, unit, string, ('b, [> `Scenario_error of string ]) Internal_pervasives.Asynchronous_result.t) Stdlib.format4 -> 'c
val wait_for_voting_period : ?level_within_period:int -> < application_name : Internal_pervasives.string ; console : Console.t ; env_config : Environment_configuration.t ; paths : Paths.t ; runner : Running_processes.State.t.. > Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t -> protocol:Mavryk_protocol.t -> client:Mavryk_client.t -> attempts:Internal_pervasives.int -> Mavryk_protocol.Voting_period.t -> (Base__Int.t, [> `Process_error of Internal_pervasives.Process_result.Error.error | `Scenario_error of string | `System_error of [ `Fatal ] * Internal_pervasives.System_error.static | `Waiting_for of Internal_pervasives.string * [ `Time_out ] ]) Internal_pervasives.Asynchronous_result.t
val run : < application_name : Internal_pervasives.string ; console : Console.t ; env_config : Environment_configuration.t ; paths : Paths.t ; pauser : Interactive_test.Pauser.t ; runner : Running_processes.State.t ; test_baking : bool ; test_interactivity : [ `Full | `None | `On_error | `At_end ].. > Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t Internal_pervasives.Base_state.t -> protocol:Mavryk_protocol.t -> next_protocol_kind:Mavryk_protocol.Protocol_kind.t -> size:Internal_pervasives.int -> base_port:Internal_pervasives.int -> no_daemons_for:Internal_pervasives.string Flexmasa.Internal_pervasives.List.t -> ?external_peer_ports:Internal_pervasives.int Internal_pervasives.list -> node_exec:Mavryk_executable.t -> client_exec:Mavryk_executable.t -> first_baker_exec:Mavryk_executable.t -> first_endorser_exec:Mavryk_executable.t -> first_accuser_exec:Mavryk_executable.t -> second_baker_exec:Mavryk_executable.t -> second_endorser_exec:Mavryk_executable.t -> second_accuser_exec:Mavryk_executable.t -> admin_exec:Mavryk_executable.t -> extra_dummy_proposals_batch_size:int -> extra_dummy_proposals_batch_levels:int Flexmasa.Internal_pervasives.List.t -> waiting_attempts:Internal_pervasives.int -> adaptive_issuance_first_baker:Mavryk_daemon.ai_vote -> adaptive_issuance_second_baker:Mavryk_daemon.ai_vote -> [< `Full_upgrade | `Nay_for_promotion ] -> [< `Interactive_pause | `Wait_level of [< `At_least of Internal_pervasives.int ] ] -> unit -> (Internal_pervasives.unit, [> `Empty_protocol_list | `Precheck_failure of Internal_pervasives.string | `Process_error of Internal_pervasives.Process_result.Error.error | `Scenario_error of string | `System_error of [ `Fatal ] * Internal_pervasives.System_error.static | `Too_many_protocols of Mavryk_protocol.t Internal_pervasives.list | `Too_many_timestamp_delays of Mavryk_protocol.t Internal_pervasives.list | `Waiting_for of Internal_pervasives.string * [ `Time_out ] ]) Internal_pervasives.Asynchronous_result.t
val cmd : unit -> Internal_pervasives.unit Cmdliner.Term.t * Cmdliner.Term.info