18 lines
880 B
OCaml
18 lines
880 B
OCaml
(**************************************************************************)
|
|
(* *)
|
|
(* Copyright (c) 2014 - 2016. *)
|
|
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
|
|
(* *)
|
|
(* All rights reserved. No warranty, explicit or implicit, provided. *)
|
|
(* *)
|
|
(**************************************************************************)
|
|
|
|
open Proto_alpha.Tezos_context
|
|
|
|
val init_amount : int
|
|
val execute_code_pred :
|
|
?tc:Tezos_context.t -> Helpers_block.result -> Script.t -> Script.expr ->
|
|
(Script.expr * Script.expr * Gas.t * context * Contract.origination_nonce)
|
|
Proto_alpha.tzresult Lwt.t
|
|
|