package octez-protocol-alpha-libs
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
Octez protocol alpha libraries
Install
dune-project
Dependency
Authors
Maintainers
Sources
octez-19.1.tar.gz
sha256=55ea1fb8bb3273a7fc270ca8f650d45c56449665619482aad9bc12f3ea736b7e
sha512=fec850fc2d17d7490bbabd5147d62aad13b3aaed8774270f8a38ab419670ed03e0fd30cf8642a97984eca5c2446726fe590ad99c015f7ec50919dc7652f25053
doc/octez-protocol-alpha-libs.test-helpers/Tezos_alpha_test_helpers/Consensus_helpers/index.html
Module Tezos_alpha_test_helpers.Consensus_helpersSource
Source
val test_consensus_operation :
?delegate:Tezos_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
?slot:Tezos_protocol_alpha.Protocol.Alpha_context.Slot.t ->
?level:Tezos_protocol_alpha.Protocol.Alpha_context.Raw_level.t ->
?round:Tezos_protocol_alpha.Protocol.Alpha_context.Round.t ->
?block_payload_hash:Tezos_protocol_alpha.Protocol.Block_payload_hash.t ->
?branch:Tezos_base.TzPervasives.Block_hash.t ->
attested_block:Block.t ->
?predecessor:Block.t ->
?error:(Tezos_protocol_alpha.Environment.Error_monad.error -> bool) ->
loc:string ->
kind ->
mode ->
(unit, Tezos_base.TzPervasives.tztrace) result Lwt.tCraft an attestation or preattestation, and bake a block containing it (in application or construction modes) or inject it into a mempool. When error is None, check that it succeeds, otherwise check that it fails as specified by error.
By default, the (pre)attestation is for the first slot and is signed by the delegate that owns this slot. Moreover, the operation points to the given attested_block: in other words, it has that block's level, round, payload hash, and its branch is the predecessor of that block. Optional arguments allow to override these default parameters.
The predecessor is used as the predecessor of the baked block or the head of the mempool. When it is not provided, we use the attested_block for this.
Source
val test_consensus_operation_all_modes_different_outcomes :
?delegate:Tezos_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
?slot:Tezos_protocol_alpha.Protocol.Alpha_context.Slot.t ->
?level:Tezos_protocol_alpha.Protocol.Alpha_context.Raw_level.t ->
?round:Tezos_protocol_alpha.Protocol.Alpha_context.Round.t ->
?block_payload_hash:Tezos_protocol_alpha.Protocol.Block_payload_hash.t ->
?branch:Tezos_base.TzPervasives.Block_hash.t ->
attested_block:Block.t ->
?predecessor:Block.t ->
loc:string ->
?application_error:
(Tezos_protocol_alpha.Environment.Error_monad.error -> bool) ->
?construction_error:
(Tezos_protocol_alpha.Environment.Error_monad.error -> bool) ->
?mempool_error:(Tezos_protocol_alpha.Environment.Error_monad.error -> bool) ->
kind ->
(unit, Tezos_base.TzPervasives.tztrace) result Lwt.tSource
val test_consensus_operation_all_modes :
?delegate:Tezos_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
?slot:Tezos_protocol_alpha.Protocol.Alpha_context.Slot.t ->
?level:Tezos_protocol_alpha.Protocol.Alpha_context.Raw_level.t ->
?round:Tezos_protocol_alpha.Protocol.Alpha_context.Round.t ->
?block_payload_hash:Tezos_protocol_alpha.Protocol.Block_payload_hash.t ->
?branch:Tezos_base.TzPervasives.Block_hash.t ->
attested_block:Block.t ->
?predecessor:Block.t ->
?error:(Tezos_protocol_alpha.Environment.Error_monad.error -> bool) ->
loc:string ->
kind ->
(unit, Tezos_base.TzPervasives.tztrace) result Lwt.tSource
val delegate_of_first_slot :
Context.t ->
(Tezos_protocol_alpha.Environment.Signature.public_key_hash
* Tezos_protocol_alpha.Protocol.Alpha_context.Slot.t,
Tezos_base.TzPervasives.tztrace)
result
Lwt.tSource
val delegate_of_slot :
?different_slot:bool ->
Tezos_protocol_alpha.Protocol.Alpha_context.Slot.t ->
Context.t ->
(Tezos_protocol_alpha.Environment.Signature.public_key_hash,
Tezos_base.TzPervasives.tztrace)
result
Lwt.tSource
val test_consensus_op_for_next :
genesis:Block.t ->
kind:[< `Attestation | `Preattestation ] ->
next:[< `Level | `Round ] ->
(unit, Tezos_base.TzPervasives.tztrace) result Lwt.t sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>