Sequencer (octez-evm-node-libs.Evm_node_lib

type tezlink_sandbox = {

chain_id : int;
funded_addresses : Tezos_base.TzPervasives.Signature.V2.public_key list;

}

type sandbox_config = {

init_from_snapshot : string option;
network : Evm_node_config.Configuration.supported_network option;
funded_addresses : Tezosx.address list;
parent_chain : Uri.t option;
disable_da_fees : bool;
kernel_verbosity : Events.kernel_log_level option;
with_runtimes : Tezosx.runtime list;
tezlink : tezlink_sandbox option;

}

val install_finalizer_seq : 
  (unit -> unit Lwt.t) ->
  (unit -> unit Lwt.t) ->
  (unit -> unit Lwt.t) option ->
  (unit -> unit Lwt.t) ->
  Lwt_exit.clean_up_callback_id

val validate_and_add_etherlink_tx : 
  string ->
  (unit, Tezos_base.TzPervasives.tztrace) Stdlib.result Lwt.t

val validate_and_add_tezlink_operation : 
  string ->
  (unit, Tezos_base.TzPervasives.tztrace) Stdlib.result Lwt.t

val validate_and_add_tx : 
  Broadcast.common_transaction ->
  unit Tezos_base.TzPervasives.tzresult Lwt.t

val loop_sequencer : 
  bool ->
  ?sandbox_config:sandbox_config ->
  rpc_timeout:float ->
  instant_confirmations:bool ->
  Evm_node_config.Configuration.time_between_blocks ->
  unit Tezos_base.TzPervasives.tzresult Lwt.t

val activate_tezlink : 
  int ->
  (unit, Tezos_base.TzPervasives.tztrace) Stdlib.result Lwt.t

val main : 
  cctxt:Tezos_client_base.Client_context.wallet ->
  ?genesis_timestamp:Tezos_base.TzPervasives.Time.Protocol.t ->
  configuration:Evm_node_config.Configuration.t ->
  ?kernel:Pvm_types.kernel ->
  ?sandbox_config:sandbox_config ->
  unit ->
  (unit, Tezos_base.TzPervasives.tztrace) Stdlib.result Lwt.t