Make (mavkit-evm-node-libs.Evm_node_lib_prod.Durable

Parameters

module Reader : READER

Signature

val inspect_durable_and_decode_opt : 
  Durable_storage_path.path ->
  (bytes -> 'a) ->
  ('b option, Mavryk_base.TzPervasives.tztrace) Stdlib.result Lwt.t

val inspect_durable_and_decode : 
  Durable_storage_path.path ->
  (bytes -> 'a) ->
  ('b, Mavryk_base.TzPervasives.tztrace) Stdlib.result Lwt.t

val balance : 
  Evm_node_lib_prod_encoding.Ethereum_types.address ->
  (Evm_node_lib_prod_encoding.Ethereum_types.quantity,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val nonce : 
  Evm_node_lib_prod_encoding.Ethereum_types.address ->
  (Evm_node_lib_prod_encoding.Ethereum_types.quantity option,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val code : 
  Evm_node_lib_prod_encoding.Ethereum_types.address ->
  (Evm_node_lib_prod_encoding.Ethereum_types.hex,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

exception Invalid_block_structure of string

exception Invalid_block_index of Z.t

val block_number : 
  Durable_storage_path.Block.number ->
  (Evm_node_lib_prod_encoding.Ethereum_types.block_height,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val current_block_number : 
  unit ->
  (Evm_node_lib_prod_encoding.Ethereum_types.block_height,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val un_qty : Evm_node_lib_prod_encoding.Ethereum_types.quantity -> Z.t

val transaction_receipt : 
  Evm_node_lib_prod_encoding.Ethereum_types.hash ->
  (Evm_node_lib_prod_encoding.Ethereum_types.transaction_receipt option,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val transaction_object : 
  Evm_node_lib_prod_encoding.Ethereum_types.hash ->
  (Evm_node_lib_prod_encoding.Ethereum_types.transaction_object option,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val transaction_object_with_block_hash : 
  Evm_node_lib_prod_encoding.Ethereum_types.block_hash ->
  Evm_node_lib_prod_encoding.Ethereum_types.hash ->
  (Evm_node_lib_prod_encoding.Ethereum_types.transaction_object option,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val full_transactions : 
  Evm_node_lib_prod_encoding.Ethereum_types.block_hash ->
  Evm_node_lib_prod_encoding.Ethereum_types.block_transactions ->
  (Evm_node_lib_prod_encoding.Ethereum_types.block_transactions,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val populate_tx_objects : 
  full_transaction_object:bool ->
  Evm_node_lib_prod_encoding.Ethereum_types.block ->
  (Evm_node_lib_prod_encoding.Ethereum_types.block,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val blocks_by_number : 
  full_transaction_object:bool ->
  number:Durable_storage_path.Block.number ->
  (Evm_node_lib_prod_encoding.Ethereum_types.block,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val current_block : 
  full_transaction_object:bool ->
  (Evm_node_lib_prod_encoding.Ethereum_types.block,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val nth_block : 
  full_transaction_object:bool ->
  Z.t ->
  (Evm_node_lib_prod_encoding.Ethereum_types.block,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val nth_block_hash : 
  Z.t ->
  (Evm_node_lib_prod_encoding.Ethereum_types.block_hash option,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val block_by_hash : 
  full_transaction_object:bool ->
  Evm_node_lib_prod_encoding.Ethereum_types.block_hash ->
  (Evm_node_lib_prod_encoding.Ethereum_types.block,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val chain_id : 
  unit ->
  (Evm_node_lib_prod_encoding.Ethereum_types.quantity,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val base_fee_per_gas : 
  unit ->
  (Evm_node_lib_prod_encoding.Ethereum_types.quantity,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t

val kernel_version : 
  unit ->
  (string, Mavryk_base.TzPervasives.tztrace) Stdlib.result Lwt.t

val kernel_root_hash : 
  unit ->
  (string option, Mavryk_base.TzPervasives.tztrace) Stdlib.result Lwt.t

val storage_at : 
  Evm_node_lib_prod_encoding.Ethereum_types.address ->
  Evm_node_lib_prod_encoding.Ethereum_types.quantity ->
  (Evm_node_lib_prod_encoding.Ethereum_types.hex,
    Mavryk_base.TzPervasives.tztrace)
    Stdlib.result
    Lwt.t