tezos-protocol-001-PtCJ7pwo 9.7

tezos-protocol-001-PtCJ7pwo

val list : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  (Alpha_context.Contract.t list,
    Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

type info = {

manager : Alpha_context.public_key_hash;
balance : Alpha_context.Tez.t;
spendable : bool;
delegate : bool * Alpha_context.public_key_hash option;
counter : Alpha_context.counter;
script : Alpha_context.Script.t option;

}

val info_encoding : info Tezos_base__TzPervasives.Data_encoding.t

val info : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (info, Tezos_base__TzPervasives.Error_monad.error list) Stdlib.result Lwt.t

val balance : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.Tez.t, Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val manager : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.public_key_hash,
    Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val manager_key : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.public_key_hash * Alpha_context.public_key option,
    Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val delegate : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.public_key_hash,
    Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val delegate_opt : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.public_key_hash option,
    Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val is_delegatable : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (bool, Tezos_base__TzPervasives.Error_monad.error list) Stdlib.result Lwt.t

val is_spendable : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (bool, Tezos_base__TzPervasives.Error_monad.error list) Stdlib.result Lwt.t

val counter : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.counter, Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val script : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.Script.t, Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val script_opt : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.Script.t option,
    Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val storage : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.Script.expr, Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val storage_opt : 
  'a Tezos_protocol_environment_001_PtCJ7pwo__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.Contract.t ->
  (Alpha_context.Script.expr option,
    Tezos_base__TzPervasives.Error_monad.error list)
    Stdlib.result
    Lwt.t

val register : unit -> unit

package tezos-protocol-001-PtCJ7pwo