Module Mina_base.Stack_frame
type ('caller, 'zkapp_command) t = ( 'caller, 'zkapp_command ) Stable.Latest.t =
{caller : 'caller; |
caller_caller : 'caller; |
calls : 'zkapp_command; |
}val make : caller:'a -> caller_caller:'b -> calls:'c -> ( 'd, 'e ) tval to_yojson :
'caller 'zkapp_command. ( 'caller -> Yojson.Safe.t ) ->
( 'zkapp_command -> Yojson.Safe.t ) ->
( 'caller, 'zkapp_command ) t ->
Yojson.Safe.tval of_yojson :
'caller 'zkapp_command. ( Yojson.Safe.t ->
'caller Ppx_deriving_yojson_runtime.error_or ) ->
( Yojson.Safe.t -> 'zkapp_command Ppx_deriving_yojson_runtime.error_or ) ->
Yojson.Safe.t ->
( 'caller, 'zkapp_command ) t Ppx_deriving_yojson_runtime.error_orval _ :
( Yojson.Safe.t -> 'a Ppx_deriving_yojson_runtime.error_or ) ->
( Yojson.Safe.t -> 'b Ppx_deriving_yojson_runtime.error_or ) ->
Yojson.Safe.t ->
( 'a, 'b ) t Ppx_deriving_yojson_runtime.error_orval calls : ( 'a, 'b ) t -> 'cval caller_caller : ( 'a, 'b ) t -> 'cval caller : ( 'a, 'b ) t -> 'cval t_of_sexp :
'caller 'zkapp_command. ( Ppx_sexp_conv_lib.Sexp.t -> 'caller ) ->
( Ppx_sexp_conv_lib.Sexp.t -> 'zkapp_command ) ->
Ppx_sexp_conv_lib.Sexp.t ->
( 'caller, 'zkapp_command ) tval sexp_of_t :
'caller 'zkapp_command. ( 'caller -> Ppx_sexp_conv_lib.Sexp.t ) ->
( 'zkapp_command -> Ppx_sexp_conv_lib.Sexp.t ) ->
( 'caller, 'zkapp_command ) t ->
Ppx_sexp_conv_lib.Sexp.ttype ('caller, 'zkapp_command) frame = ( 'caller, 'zkapp_command ) t