package tezos-protocol-010-PtGRANAD
Install
    
    dune-project
 Dependency
Authors
Maintainers
Sources
sha256=7062cd57addd452852598a2214ade393130efa087b99068d53713bdf912b3680
    
    
  sha512=08e4091144a03ce3c107fb91a66501bd8b65ca3278917c455a2eaac6df3e108ade63f6ab8340a4bb152d60f404326e464d0ec95d26cafe8e82f870465d24a5fc
    
    
  doc/tezos-protocol-010-PtGRANAD.raw/Tezos_raw_protocol_010_PtGRANAD/Raw_context/index.html
Module Tezos_raw_protocol_010_PtGRANAD.Raw_contextSource
Errors
type storage_error = - | Incompatible_protocol_version of string
- | Missing_key of string list * missing_key_kind
- | Existing_key of string list
- | Corrupted_data of string list
An internal storage error that should not happen
type Tezos_protocol_environment_010_PtGRANAD.Error_monad.error += - | Storage_error of storage_error
type Tezos_protocol_environment_010_PtGRANAD.Error_monad.error += - | Failed_to_decode_parameter of Tezos_protocol_environment_010_PtGRANAD.Data_encoding.json * string
val storage_error : 
  storage_error ->
  'a Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultAbstract Context
Abstract view of the context. Includes a handle to the functional key-value database (Context.t) along with some in-memory values (gas, etc.).
val prepare : 
  level:Tezos_protocol_environment_010_PtGRANAD.Int32.t ->
  predecessor_timestamp:Tezos_protocol_environment_010_PtGRANAD.Time.t ->
  timestamp:Tezos_protocol_environment_010_PtGRANAD.Time.t ->
  fitness:Tezos_protocol_environment_010_PtGRANAD.Fitness.t ->
  Tezos_protocol_environment_010_PtGRANAD.Context.t ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tRetrieves the state of the database and gives its abstract view. It also returns wether this is the first block validated with this version of the protocol.
val prepare_first_block : 
  level:int32 ->
  timestamp:Tezos_protocol_environment_010_PtGRANAD.Time.t ->
  fitness:Tezos_protocol_environment_010_PtGRANAD.Fitness.t ->
  Tezos_protocol_environment_010_PtGRANAD.Context.t ->
  (previous_protocol * t)
    Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tReturns the state of the database resulting of operations on its abstract view
val patch_constants : 
  t ->
  (Constants_repr.parametric -> Constants_repr.parametric) ->
  t Tezos_protocol_environment_010_PtGRANAD.Lwt.tRetrieve the cycle eras.
val add_fees : 
  t ->
  Tez_repr.t ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultIncrement the current block fee stash that will be credited to baker's frozen_fees account at finalize_application
val add_rewards : 
  t ->
  Tez_repr.t ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultIncrement the current block reward stash that will be credited to baker's frozen_fees account at finalize_application
val add_deposit : 
  t ->
  Tezos_protocol_environment_010_PtGRANAD.Signature.Public_key_hash.t ->
  Tez_repr.t ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultIncrement the current block deposit stash for a specific delegate. All the delegates' frozen_deposit accounts are credited at finalize_application
val get_deposits : 
  t ->
  Tez_repr.t
    Tezos_protocol_environment_010_PtGRANAD.Signature.Public_key_hash.Map.tval check_gas_limit_is_valid : 
  t ->
  'a Gas_limit_repr.Arith.t ->
  unit Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultval consume_gas_limit_in_block : 
  t ->
  'a Gas_limit_repr.Arith.t ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultval gas_exhausted_error : 
  t ->
  'a Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultval init_origination_nonce : 
  t ->
  Tezos_protocol_environment_010_PtGRANAD.Operation_hash.t ->
  tval origination_nonce : 
  t ->
  Contract_repr.origination_nonce
    Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultval increment_origination_nonce : 
  t ->
  (t * Contract_repr.origination_nonce)
    Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultGeneric accessors
include T with type t := t
include Raw_context_intf.VIEW
  with type key := key
  with type value := value
  with type tree := tree
  with type t := t
Getters
mem t k is an Lwt promise that resolves to true iff k is bound to a value in t.
mem_tree t k is like mem but for trees.
val get : 
  t ->
  key ->
  value Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tget t k is an Lwt promise that resolves to Ok v if k is bound to the value v in t and Storage_ErrorMissing_key otherwise.
val get_tree : 
  t ->
  key ->
  tree Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tget_tree is like get but for trees.
find t k is an Lwt promise that resolves to Some v if k is bound to the value v in t and None otherwise.
find_tree t k is like find but for trees.
val list : 
  t ->
  ?offset:int ->
  ?length:int ->
  key ->
  (string * tree) list Tezos_protocol_environment_010_PtGRANAD.Lwt.tlist t key is the list of files and sub-nodes stored under k in t. The result order is not specified but is stable.
offset and length are used for pagination.
Setters
val init : 
  t ->
  key ->
  value ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tinit t k v is an Lwt promise that resolves to Ok c if:
- kis unbound in- t;
- kis bound to- vin- c;
- and cis similar tototherwise.
It is Storage_errorExisting_key if k is already bound in t.
val init_tree : 
  t ->
  key ->
  tree ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tinit_tree is like init but for trees.
val update : 
  t ->
  key ->
  value ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tupdate t k v is an Lwt promise that resolves to Ok c if:
- kis bound in- t;
- kis bound to- vin- c;
- and cis similar tototherwise.
It is Storage_errorMissing_key if k is not already bound in t.
val update_tree : 
  t ->
  key ->
  tree ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tupdate_tree is like update but for trees.
add t k v is an Lwt promise that resolves to c such that:
- kis bound to- vin- c;
- and cis similar tototherwise.
If k was already bound in t to a value that is physically equal to v, the result of the function is a promise that resolves to t. Otherwise, the previous binding of k in t disappears.
add_tree is like add but for trees.
remove t k v is an Lwt promise that resolves to c such that:
- kis unbound in- c;
- and cis similar tototherwise.
val remove_existing : 
  t ->
  key ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tremove_existing t k v is an Lwt promise that resolves to Ok c if:
- kis bound in- tto a value;
- kis unbound in- c;
- and cis similar tototherwise.
val remove_existing_tree : 
  t ->
  key ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresult
    Tezos_protocol_environment_010_PtGRANAD.Lwt.tremove_existing_tree t k v is an Lwt promise that reolves to Ok c if:
- kis bound in- tto a tree;
- kis unbound in- c;
- and cis similar tototherwise.
val add_or_remove : 
  t ->
  key ->
  value option ->
  t Tezos_protocol_environment_010_PtGRANAD.Lwt.tadd_or_remove t k v is:
- add t k xif- vis- Some x;
- remove t kotherwise.
val add_or_remove_tree : 
  t ->
  key ->
  tree option ->
  t Tezos_protocol_environment_010_PtGRANAD.Lwt.tadd_or_remove_tree t k v is:
- add_tree t k xif- vis- Some x;
- remove t kotherwise.
Folds
val fold : 
  ?depth:[ `Eq of int | `Le of int | `Lt of int | `Ge of int | `Gt of int ] ->
  t ->
  key ->
  init:'a ->
  f:(key -> tree -> 'a -> 'a Tezos_protocol_environment_010_PtGRANAD.Lwt.t) ->
  'a Tezos_protocol_environment_010_PtGRANAD.Lwt.tfold ?depth t root ~init ~f recursively folds over the trees and values of t. The f callbacks are called with a key relative to root. f is never called with an empty key for values; i.e., folding over a value is a no-op.
Elements are traversed in lexical order of keys.
The depth is 0-indexed. If depth is set (by default it is not), then f is only called when the conditions described by the parameter is true:
- Eq dfolds over nodes and contents of depth exactly- d.
- Lt dfolds over nodes and contents of depth strictly less than- d.
- Le dfolds over nodes and contents of depth less than or equal to- d.
- Gt dfolds over nodes and contents of depth strictly more than- d.
- Ge dfolds over nodes and contents of depth more than or equal to- d.
module Tree : 
  Raw_context_intf.TREE
    with type t := t
     and type key := key
     and type value := value
     and type tree := treeTree provides immutable, in-memory partial mirror of the context, with lazy reads and delayed writes. The trees are Merkle trees that carry the same hash as the part of the context they mirror.
Internally used in Storage_functors to escape from a view.
Internally used in Storage_functors to retrieve a full key from partial key relative a view.
Raised if block gas quota is exhausted during gas consumption.
Raised if operation gas quota is exhausted during gas consumption.
val consume_gas : 
  t ->
  Gas_limit_repr.cost ->
  t Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultInternally used in Storage_functors to consume gas from within a view. May raise Block_quota_exceeded or Operation_quota_exceeded.
val check_enough_gas : 
  t ->
  Gas_limit_repr.cost ->
  unit Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultCheck if consume_gas will fail
Initialize the local nonce used for preventing a script to duplicate an internal operation to replay it.
val fresh_internal_nonce : 
  t ->
  (t * int) Tezos_protocol_environment_010_PtGRANAD.Error_monad.tzresultIncrements the internal operation nonce.
Check is the internal operation nonce has been taken.
val allowed_endorsements : 
  t ->
  (Tezos_protocol_environment_010_PtGRANAD.Signature.Public_key.t
   * int list
   * bool)
    Tezos_protocol_environment_010_PtGRANAD.Signature.Public_key_hash.Map.tReturns a map where to each endorser's pkh is associated the list of its endorsing slots (in increasing order) for a given level.
Keep track of the number of endorsements that are included in a block
val init_endorsements : 
  t ->
  (Tezos_protocol_environment_010_PtGRANAD.Signature.Public_key.t
   * int list
   * bool)
    Tezos_protocol_environment_010_PtGRANAD.Signature.Public_key_hash.Map.t ->
  tInitializes the map of allowed endorsements, this function must only be called once.
val record_endorsement : 
  t ->
  Tezos_protocol_environment_010_PtGRANAD.Signature.Public_key_hash.t ->
  tMarks an endorsement in the map as used.
val fold_map_temporary_lazy_storage_ids : 
  t ->
  (Lazy_storage_kind.Temp_ids.t -> Lazy_storage_kind.Temp_ids.t * 'res) ->
  t * 'resval map_temporary_lazy_storage_ids_s : 
  t ->
  (Lazy_storage_kind.Temp_ids.t ->
    (t * Lazy_storage_kind.Temp_ids.t)
      Tezos_protocol_environment_010_PtGRANAD.Lwt.t) ->
  t Tezos_protocol_environment_010_PtGRANAD.Lwt.t