Flexmasa.Interactive_mini_network
module Genesis_block_hash : sig ... end
A.k.a the chain_id
val run_dsl_cmd :
< application_name : Internal_pervasives.string
; console : Console.t
; env_config : Environment_configuration.t
; operations_log : Log_recorder.Operations.t
; paths : Paths.t
; runner : Running_processes.State.t
; test_baking : Internal_pervasives.bool.. > ->
Mavryk_client.Keyed.t Internal_pervasives.list ->
Mavryk_node.t Internal_pervasives.list ->
Flexmasa.Internal_pervasives.String.t ->
(Internal_pervasives.unit,
[> `Command_line of Internal_pervasives.string
| `Msg of Flexmasa.Internal_pervasives.String.t
| `Process_error of Internal_pervasives.Process_result.Error.error
| `System_error of [ `Fatal ] * Internal_pervasives.System_error.static ])
Internal_pervasives.Asynchronous_result.t
val run :
< application_name : Internal_pervasives.string
; console : Console.t
; env_config : Environment_configuration.t
; operations_log : Log_recorder.Operations.t
; paths : Paths.t
; pauser : Interactive_test.Pauser.t
; runner : Running_processes.State.t
; test_baking : Internal_pervasives.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 ->
protocol:Mavryk_protocol.t ->
size:Internal_pervasives.int ->
base_port:Internal_pervasives.int ->
clear_root:Internal_pervasives.bool ->
no_daemons_for:Internal_pervasives.string Flexmasa.Internal_pervasives.List.t ->
?hard_fork:Hard_fork.t ->
genesis_block_choice:Genesis_block_hash.Choice.t ->
?external_peer_ports:Internal_pervasives.int Internal_pervasives.list ->
nodes_history_mode_edits:
[> `Command_line of Internal_pervasives.string
| `Empty_protocol_list
| `Msg of Flexmasa.Internal_pervasives.String.t
| `Precheck_failure of Internal_pervasives.string
| `Process_error of Internal_pervasives.Process_result.Error.error
| `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 ] ] as 'a
Mavryk_node.History_modes.edit ->
Mavryk_executable.t ->
Mavryk_executable.t ->
Mavryk_executable.t ->
Mavryk_executable.t ->
Mavryk_executable.t ->
[< `Dsl_traffic of
[< `Dsl_command of Flexmasa.Internal_pervasives.String.t ]
* [< `After of [< `Interactive | `Until of Internal_pervasives.int ] ]
| `Interactive
| `Random_traffic of [< `Any ] * [< `Until of Internal_pervasives.int ]
| `Wait_level of [< `At_least of Internal_pervasives.int ] ] ->
?smart_rollup:Smart_rollup.t ->
smart_contracts:Smart_contract.t Internal_pervasives.list ->
adaptive_issuance:Mavryk_daemon.ai_vote ->
unit ->
(Internal_pervasives.unit, 'b) Internal_pervasives.Asynchronous_result.t
val cmd : unit -> Internal_pervasives.unit Cmdliner.Term.t * Cmdliner.Term.info