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.0.tar.gz
sha256=c6df840ebbf115e454db949028c595bec558a59a66cade73b52a6d099d6fa4d4
sha512=d8aee903b9fe130d73176bc8ec38b78c9ff65317da3cb4f3415f09af0c625b4384e7498201fdb61aa39086a7d5d409d0ab3423f9bc3ab989a680cf444a79bc13
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)"
>