package tezos-protocol-002-PsYLVpVv

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
type Tezos_protocol_environment_002_PsYLVpVv__Environment.Error_monad.error +=
  1. | Cannot_pay_storage_fee
type Tezos_protocol_environment_002_PsYLVpVv__Environment.Error_monad.error +=
  1. | Operation_quota_exceeded
type Tezos_protocol_environment_002_PsYLVpVv__Environment.Error_monad.error +=
  1. | Storage_limit_too_high
val origination_burn : Raw_context.t -> payer:Contract_repr.t -> (Raw_context.t * Tez_repr.t, Tezos_protocol_environment_002_PsYLVpVv__Environment.Error_monad.error list) result Lwt.t
val record_paid_storage_space : Raw_context.t -> Contract_repr.t -> (Raw_context.t * Z.t * Z.t * Tez_repr.t, Tezos_protocol_environment_002_PsYLVpVv__Environment.Error_monad.error list) result Lwt.t

The returned Tez quantity is for logging purpose only

val check_storage_limit : Raw_context.t -> storage_limit:Z.t -> (unit, Tezos_protocol_environment_002_PsYLVpVv__Environment.Error_monad.error list) 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_002_PsYLVpVv__Environment.Error_monad.error list) result Lwt.t