package tezos-protocol-011-PtHangz2

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
type Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.error +=
  1. | Cannot_pay_storage_fee
type Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.error +=
  1. | Operation_quota_exceeded
type Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.error +=
  1. | Storage_limit_too_high
val origination_burn : Raw_context.t -> (Raw_context.t * Tez_repr.t, Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.error Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.trace) result

Does not burn, only adds the burn to storage space to be paid

val cost_of_bytes : Raw_context.t -> Z.t -> (Tez_repr.t, Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.error Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.trace) result

cost_of_bytes ctxt n calculates the cost of storing n bytes in the key-value store.

val record_paid_storage_space : Raw_context.t -> Contract_repr.t -> (Raw_context.t * Z.t * Z.t * Tez_repr.t, Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.error Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.trace) result Lwt.t

The returned Tez quantity is for logging purpose only

val record_global_constant_storage_space : Raw_context.t -> Z.t -> Raw_context.t * Z.t

record_global_constant_storage_space ctxt size records paid storage space for registering a new global constant. Cost is <size> in bytes + 65 additional bytes for the key hash of the expression. Returns new context and the cost.

val record_paid_storage_space_subsidy : Raw_context.t -> Contract_repr.t -> (Raw_context.t * Z.t * Z.t, Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.error Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.trace) result Lwt.t

Record paid storage space for contract without burn. For use only in subsidies. Will fail if storage_space_to_pay has been initialized.

val check_storage_limit : Raw_context.t -> storage_limit:Z.t -> (unit, Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.error Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.trace) result
val start_counting_storage_fees : Raw_context.t -> Raw_context.t
val burn_storage_fees : Raw_context.t -> storage_limit:Z.t -> payer:Contract_repr.t -> (Raw_context.t, Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.error Tezos_protocol_environment_011_PtHangz2__Environment.Error_monad.trace) result Lwt.t
OCaml

Innovation. Community. Security.