tezos-baking-alpha 12.3 · OCaml Package

type highwatermark = {

round : Tezos_protocol_alpha.Protocol.Alpha_context.Round.t;
level : int32;

}

type Tezos_base__TzPervasives.error +=

| Block_previously_baked of highwatermark

type Tezos_base__TzPervasives.error +=

| Block_previously_preendorsed of highwatermark

type Tezos_base__TzPervasives.error +=

| Block_previously_endorsed of highwatermark

type t

val encoding : t Data_encoding.t

val load : 
  Tezos_client_alpha.Protocol_client_context.full ->
  [ `Highwatermarks ] Baking_files.location ->
  (t, Tezos_error_monad.TzCore.error list) result Lwt.t

val may_sign_block : 
  Tezos_client_alpha.Protocol_client_context.full ->
  [ `Highwatermarks ] Baking_files.location ->
  delegate:Tezos_crypto.Signature.public_key_hash ->
  level:int32 ->
  round:Tezos_protocol_alpha.Protocol.Alpha_context.Round.t ->
  (bool, Tezos_error_monad.TzCore.error list) result Lwt.t

val may_sign_preendorsement : 
  Tezos_client_alpha.Protocol_client_context.full ->
  [ `Highwatermarks ] Baking_files.location ->
  delegate:Tezos_crypto.Signature.public_key_hash ->
  level:int32 ->
  round:Tezos_protocol_alpha.Protocol.Alpha_context.Round.t ->
  (bool, Tezos_error_monad.TzCore.error list) result Lwt.t

val may_sign_endorsement : 
  Tezos_client_alpha.Protocol_client_context.full ->
  [ `Highwatermarks ] Baking_files.location ->
  delegate:Tezos_crypto.Signature.public_key_hash ->
  level:int32 ->
  round:Tezos_protocol_alpha.Protocol.Alpha_context.Round.t ->
  (bool, Tezos_error_monad.TzCore.error list) result Lwt.t

val record_block : 
  Tezos_client_alpha.Protocol_client_context.full ->
  [ `Highwatermarks ] Baking_files.location ->
  delegate:Tezos_crypto.Signature.public_key_hash ->
  level:int32 ->
  round:Tezos_protocol_alpha.Protocol.Alpha_context.Round.t ->
  (unit, Tezos_error_monad.TzCore.error list) result Lwt.t

val record_preendorsement : 
  Tezos_client_alpha.Protocol_client_context.full ->
  [ `Highwatermarks ] Baking_files.location ->
  delegate:Tezos_crypto.Signature.public_key_hash ->
  level:int32 ->
  round:Tezos_protocol_alpha.Protocol.Alpha_context.Round.t ->
  (unit, Tezos_error_monad.TzCore.error list) result Lwt.t

val record_endorsement : 
  Tezos_client_alpha.Protocol_client_context.full ->
  [ `Highwatermarks ] Baking_files.location ->
  delegate:Tezos_crypto.Signature.public_key_hash ->
  level:int32 ->
  round:Tezos_protocol_alpha.Protocol.Alpha_context.Round.t ->
  (unit, Tezos_error_monad.TzCore.error list) result Lwt.t

package tezos-baking-alpha