Forge (mavkit-protocol-alpha-libs.Mavryk_alpha_test

val contents : 
  ?proof_of_work_threshold:Stdlib.Int64.t ->
  ?seed_nonce_hash:Mavryk_protocol_alpha.Protocol.Nonce_hash.t ->
  ?liquidity_baking_toggle_vote:
    Mavryk_protocol_alpha.Protocol.Alpha_context.Per_block_votes.per_block_vote ->
  ?adaptive_issuance_vote:
    Mavryk_protocol_alpha.Protocol.Alpha_context.Per_block_votes.per_block_vote ->
  payload_hash:Mavryk_protocol_alpha.Protocol.Block_payload_hash.t ->
  payload_round:Mavryk_protocol_alpha.Protocol.Alpha_context.Round.t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Block_header.shell_header ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Block_header.contents
    Mavryk_base.TzPervasives.tzresult
    Lwt.t

type header

val classify_operations : 
  Mavryk_protocol_alpha.Protocol.Alpha_context.packed_operation list ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.packed_operation list list

val forge_header : 
  ?locked_round:Mavryk_protocol_alpha.Protocol.Alpha_context.Round.t option ->
  ?payload_round:Mavryk_protocol_alpha.Protocol.Alpha_context.Round.t option ->
  ?policy:baker_policy ->
  ?timestamp:Mavryk_protocol_alpha.Protocol.Alpha_context.Timestamp.time ->
  ?operations:
    Mavryk_protocol_alpha.Protocol.Alpha_context.Operation.packed list ->
  ?liquidity_baking_toggle_vote:
    Mavryk_protocol_alpha.Protocol.Alpha_context.Per_block_votes.per_block_vote ->
  ?adaptive_issuance_vote:
    Mavryk_protocol_alpha.Protocol.Alpha_context.Per_block_votes.per_block_vote ->
  t ->
  header Mavryk_base.TzPervasives.tzresult Lwt.t

Forges a correct header following the policy. The header can then be modified and applied with apply.

val set_seed_nonce_hash : 
  ?proof_of_work_threshold:int64 ->
  Mavryk_protocol_alpha.Protocol.Nonce_hash.t option ->
  header ->
  (header, Mavryk_base.TzPervasives.tztrace) Stdlib.result Lwt.t

Sets uniquely seed_nonce_hash of a header

val set_baker : 
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  ?consensus_key:Mavryk_base.TzPervasives.Signature.public_key_hash ->
  header ->
  header

Sets the baker that will sign the header to an arbitrary pkh

val sign_header : 
  header ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Block_header.block_header
    Mavryk_base.TzPervasives.tzresult
    Lwt.t

Signs the header with the key of the baker configured in the header. The header can no longer be modified, only applied.