tezos-protocol-014-PtKathma 20.1

This module re-exports definitions from Fees_storage.

val record_paid_storage_space : 
  context ->
  Contract.t ->
  (context
   * Tezos_protocol_environment_014_PtKathma.Z.t
   * Tezos_protocol_environment_014_PtKathma.Z.t)
    Tezos_protocol_environment_014_PtKathma.Error_monad.tzresult
    Tezos_protocol_environment_014_PtKathma.Lwt.t

val record_global_constant_storage_space : 
  context ->
  Tezos_protocol_environment_014_PtKathma.Z.t ->
  context * Tezos_protocol_environment_014_PtKathma.Z.t

val burn_storage_fees : 
  ?origin:Receipt.update_origin ->
  context ->
  storage_limit:Tezos_protocol_environment_014_PtKathma.Z.t ->
  payer:Token.source ->
  Tezos_protocol_environment_014_PtKathma.Z.t ->
  (context
   * Tezos_protocol_environment_014_PtKathma.Z.t
   * Receipt.balance_updates)
    Tezos_protocol_environment_014_PtKathma.Error_monad.tzresult
    Tezos_protocol_environment_014_PtKathma.Lwt.t

val burn_storage_increase_fees : 
  ?origin:Receipt_repr.update_origin ->
  context ->
  payer:Token.source ->
  Tezos_protocol_environment_014_PtKathma.Z.t ->
  (context * Receipt.balance_updates)
    Tezos_protocol_environment_014_PtKathma.Error_monad.tzresult
    Tezos_protocol_environment_014_PtKathma.Lwt.t

val burn_origination_fees : 
  ?origin:Receipt.update_origin ->
  context ->
  storage_limit:Tezos_protocol_environment_014_PtKathma.Z.t ->
  payer:Token.source ->
  (context
   * Tezos_protocol_environment_014_PtKathma.Z.t
   * Receipt.balance_updates)
    Tezos_protocol_environment_014_PtKathma.Error_monad.tzresult
    Tezos_protocol_environment_014_PtKathma.Lwt.t

val burn_tx_rollup_origination_fees : 
  ?origin:Receipt.update_origin ->
  context ->
  storage_limit:Tezos_protocol_environment_014_PtKathma.Z.t ->
  payer:Token.source ->
  (context
   * Tezos_protocol_environment_014_PtKathma.Z.t
   * Receipt.balance_updates)
    Tezos_protocol_environment_014_PtKathma.Error_monad.tzresult
    Tezos_protocol_environment_014_PtKathma.Lwt.t

val burn_sc_rollup_origination_fees : 
  ?origin:Receipt.update_origin ->
  context ->
  storage_limit:Tezos_protocol_environment_014_PtKathma.Z.t ->
  payer:Token.source ->
  Tezos_protocol_environment_014_PtKathma.Z.t ->
  (context
   * Tezos_protocol_environment_014_PtKathma.Z.t
   * Receipt.balance_updates)
    Tezos_protocol_environment_014_PtKathma.Error_monad.tzresult
    Tezos_protocol_environment_014_PtKathma.Lwt.t

type Tezos_protocol_environment_014_PtKathma.Error_monad.error +=

| Cannot_pay_storage_fee

type Tezos_protocol_environment_014_PtKathma.Error_monad.error +=

| Operation_quota_exceeded

type Tezos_protocol_environment_014_PtKathma.Error_monad.error +=

| Storage_limit_too_high

val check_storage_limit : 
  context ->
  storage_limit:Tezos_protocol_environment_014_PtKathma.Z.t ->
  unit Tezos_protocol_environment_014_PtKathma.Error_monad.tzresult

package tezos-protocol-014-PtKathma