73 lines
2.1 KiB
OCaml
73 lines
2.1 KiB
OCaml
|
(**************************************************************************)
|
||
|
|
(* *)
|
||
|
|
(* Copyright (c) 2014 - 2018. *)
|
||
|
|
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
|
||
|
|
(* *)
|
||
|
|
(* All rights reserved. No warranty, explicit or implicit, provided. *)
|
||
|
|
(* *)
|
||
|
|
(**************************************************************************)
|
||
|
|
|
||
|
|
open Proto_alpha
|
||
|
|
open Alpha_context
|
||
|
|
|
||
|
|
val endorsement:
|
||
|
|
?delegate:public_key_hash ->
|
||
|
|
?level:Raw_level.t ->
|
||
|
|
Context.t -> ?signing_context:Context.t ->
|
||
|
|
int -> Operation.t tzresult Lwt.t
|
||
|
|
|
||
|
|
val miss_signed_endorsement:
|
||
|
|
?level:Raw_level.t ->
|
||
|
|
Context.t -> int -> Operation.t tzresult Lwt.t
|
||
|
|
|
||
|
|
val transaction:
|
||
|
|
?fee:Tez.tez ->
|
||
|
|
?gas_limit:Z.t ->
|
||
|
|
?storage_limit:int64 ->
|
||
|
|
?parameters:Script.lazy_expr ->
|
||
|
|
Context.t ->
|
||
|
|
Contract.t ->
|
||
|
|
Contract.t ->
|
||
|
|
Tez.t ->
|
||
|
|
Operation.t tzresult Lwt.t
|
||
|
|
|
||
|
|
val delegation:
|
||
|
|
?fee:Tez.tez -> Context.t ->
|
||
|
|
Contract.t -> public_key_hash option ->
|
||
|
|
Operation.t tzresult Lwt.t
|
||
|
|
|
||
|
|
val revelation:
|
||
|
|
Context.t -> public_key -> Operation.t tzresult Lwt.t
|
||
|
|
|
||
|
|
val origination:
|
||
|
|
?delegate:public_key_hash ->
|
||
|
|
?script:Script.t ->
|
||
|
|
?spendable:bool ->
|
||
|
|
?delegatable:bool ->
|
||
|
|
?preorigination: Contract.contract option ->
|
||
|
|
?public_key:public_key ->
|
||
|
|
?manager:public_key_hash ->
|
||
|
|
?credit:Tez.tez ->
|
||
|
|
?fee:Tez.tez ->
|
||
|
|
?gas_limit:Z.t ->
|
||
|
|
?storage_limit:int64 ->
|
||
|
|
Context.t ->
|
||
|
|
Contract.contract ->
|
||
|
|
(Operation.t * Contract.contract) tzresult Lwt.t
|
||
|
|
|
||
|
|
val originated_contract:
|
||
|
|
Operation.t -> Contract.contract
|
||
|
|
|
||
|
|
val double_endorsement:
|
||
|
|
Context.t -> Operation.t -> Operation.t
|
||
|
|
-> Operation.t tzresult Lwt.t
|
||
|
|
|
||
|
|
val double_baking:
|
||
|
|
Context.t -> Block_header.block_header -> Block_header.block_header
|
||
|
|
-> Operation.t tzresult Lwt.t
|
||
|
|
|
||
|
|
val activation:
|
||
|
|
Context.t ->
|
||
|
|
Signature.Public_key_hash.t -> Blinded_public_key_hash.activation_code ->
|
||
|
|
Operation.t tzresult Lwt.t
|