package octez-protocol-017-PtNairob-libs

  1. Overview
  2. Docs
package octez-protocol-017-PtNairob-libs
Legend:
Library
Module
Module type
Parameter
Class
Class type
type loop_state
val create_loop_state : ?get_valid_blocks_stream:Baking_state.proposal Lwt_stream.t Lwt.t -> heads_stream:Baking_state.proposal Lwt_stream.t -> Operation_worker.t -> loop_state
val sleep_until : Tezos_base.TzPervasives.Time.Protocol.t -> unit Lwt.t option
val wait_next_event : timeout:[ `Timeout of Baking_state.timeout_kind ] Lwt.t -> loop_state -> (Baking_state.event option, Tezos_base.TzPervasives.error Tezos_base.TzPervasives.trace) result Lwt.t

An event monitor using the streams in loop_state (to create promises) and a timeout promise timeout. The function reacts to a promise being fulfilled by firing an event Baking_state.event.

val compute_next_round_time : Baking_state.state -> (Tezos_base.TzPervasives.Time.Protocol.t * Tezos_protocol_017_PtNairob.Protocol.Alpha_context.Round.t) option
val compute_next_potential_baking_time_at_next_level : Baking_state.state -> (Tezos_base.TzPervasives.Time.Protocol.t * Tezos_protocol_017_PtNairob.Protocol.Alpha_context.Round.t) option Lwt.t
val compute_next_timeout : Baking_state.state -> Baking_state.timeout_kind Lwt.t Tezos_base.TzPervasives.tzresult Lwt.t
val compute_bootstrap_event : Baking_state.state -> Baking_state.event Tezos_base.TzPervasives.tzresult
val automaton_loop : ?stop_on_event:(Baking_state.event -> bool) -> config:Baking_configuration.t -> on_error: (Tezos_base.TzPervasives.tztrace -> (unit, Tezos_base.TzPervasives.tztrace) result Lwt.t) -> loop_state -> Baking_state.state -> Baking_state.event -> Baking_state.event option Tezos_base.TzPervasives.tzresult Lwt.t
val run : Tezos_client_017_PtNairob.Protocol_client_context.full -> ?canceler:Lwt_canceler.t -> ?stop_on_event:(Baking_state.event -> bool) -> ?on_error: (Tezos_base.TzPervasives.tztrace -> unit Tezos_base.TzPervasives.tzresult Lwt.t) -> chain:Tezos_shell_services.Chain_services.chain -> Baking_configuration.t -> Baking_state.consensus_key list -> unit Tezos_base.TzPervasives.tzresult Lwt.t
OCaml

Innovation. Community. Security.

GitHub Discord Twitter Peertube RSS
About
Changelog Releases Industrial Users Academic Users Why OCaml
Ecosystem
Packages Community Events OCaml Planet Jobs
Resources
Install OCaml Get Started Platform Tools Language Manual Standard Library API Books Exercises Papers OCaml Playground Logo
Policies
Carbon Footprint Governance Privacy Code of Conduct