package tezos-protocol-012-Psithaca
This is the Michelson interpreter.
This module offers a way to execute either a Michelson script or a Michelson instruction.
Implementation details are documented in the .ml file.
type Tezos_protocol_environment_012_Psithaca.Error_monad.error +=
| Overflow of Alpha_context.Script.location * Script_typed_ir.execution_trace option
type Tezos_protocol_environment_012_Psithaca.Error_monad.error +=
| Runtime_contract_error of Alpha_context.Contract.t
type Tezos_protocol_environment_012_Psithaca.Error_monad.error +=
| Bad_contract_parameter of Alpha_context.Contract.t
type execution_result = {
ctxt : Alpha_context.context;
storage : Alpha_context.Script.expr;
lazy_storage_diff : Alpha_context.Lazy_storage.diffs option;
operations : Alpha_context.packed_internal_operation list;
}
type step_constants = Script_typed_ir.step_constants = {
source : Alpha_context.Contract.t;
payer : Alpha_context.Contract.t;
self : Alpha_context.Contract.t;
amount : Alpha_context.Tez.t;
chain_id : Tezos_protocol_environment_012_Psithaca.Chain_id.t;
now : Alpha_context.Script_timestamp.t;
level : Alpha_context.Script_int.n Alpha_context.Script_int.num;
}
val step :
Script_typed_ir.logger option ->
Alpha_context.context ->
Script_typed_ir.step_constants ->
('a, 's, 'r, 'f) Script_typed_ir.kdescr ->
'a ->
's ->
('r * 'f * Alpha_context.context)
Tezos_protocol_environment_012_Psithaca.Error_monad.tzresult
Tezos_protocol_environment_012_Psithaca.Lwt.t
val execute :
?logger:Script_typed_ir.logger ->
Alpha_context.t ->
cached_script:Script_ir_translator.ex_script option ->
Script_ir_translator.unparsing_mode ->
step_constants ->
script:Alpha_context.Script.t ->
entrypoint:string ->
parameter:Alpha_context.Script.expr ->
internal:bool ->
(execution_result * (Script_ir_translator.ex_script * int))
Tezos_protocol_environment_012_Psithaca.Error_monad.tzresult
Tezos_protocol_environment_012_Psithaca.Lwt.t
execute ?logger ctxt ~cached_script mode step_constant ~script
~entrypoint ~parameter ~internal
interprets the script
's entrypoint
for a given parameter
.
This will update the local storage of the contract step_constants.self
. Other pieces of contextual information (source
, payer
, amount
, and chaind_id
) are also passed in step_constant
.
internal
is true
if and only if the execution happens within an internal operation.
mode
is the unparsing mode, as declared by Script_ir_translator
.
cached_script
is the cached elaboration of script
, that is the well typed abstract syntax tree produced by the type elaboration of script
during a previous execution and stored in the in-memory cache.
val kstep :
Script_typed_ir.logger option ->
Alpha_context.context ->
step_constants ->
('a, 's, 'r, 'f) Script_typed_ir.kinstr ->
'a ->
's ->
('r * 'f * Alpha_context.context)
Tezos_protocol_environment_012_Psithaca.Error_monad.tzresult
Tezos_protocol_environment_012_Psithaca.Lwt.t
kstep logger ctxt step_constants kinstr accu stack
interprets the script represented by kinstr
under the context ctxt
. This will turn a stack whose topmost element is accu
and remaining elements stack
into a new accumulator and a new stack. This function also returns an updated context. If logger
is given, kstep
calls back its functions at specific points of the execution. The execution is parameterized by some step_constants
.
Internal interpretation loop ============================
The following types and the following functions are exposed in the interface to allow the inference of a gas model in snoop.
Strictly speaking, they should not be considered as part of the interface since they expose implementation details that may change in the future.
module Internals : sig ... end