Michelson_v1_entrypoints (mavkit-protocol-alpha-libs.Mavryk_client_alpha.Michelson_v1

val script_entrypoint_type : 
  Protocol_client_context.rpc_context ->
  chain:Mavryk_shell_services.Chain_services.chain ->
  block:Mavryk_shell_services.Block_services.block ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Script.expr ->
  entrypoint:Mavryk_protocol_alpha.Protocol.Alpha_context.Entrypoint.t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Script.expr option
    Mavryk_base.TzPervasives.tzresult
    Lwt.t

Returns Some type if the contract has an entrypoint of type type. None if it does not exist.

val contract_entrypoint_type : 
  Protocol_client_context.rpc_context ->
  chain:Mavryk_shell_services.Chain_services.chain ->
  block:Mavryk_shell_services.Block_services.block ->
  contract:Mavryk_protocol_alpha.Protocol.Contract_hash.t ->
  entrypoint:Mavryk_protocol_alpha.Protocol.Alpha_context.Entrypoint.t ->
  normalize_types:bool ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Script.expr option
    Mavryk_base.TzPervasives.tzresult
    Lwt.t

Returns Some type if the script has an entrypoint of type type. None if it does not exist.

val print_entrypoint_type : 
  Mavryk_client_base.Client_context.printer ->
  ?on_errors:
    (Mavryk_base.TzPervasives.error list ->
      unit Mavryk_base.TzPervasives.tzresult Lwt.t) ->
  emacs:bool ->
  ?contract:Mavryk_protocol_alpha.Protocol.Contract_hash.t ->
  ?script_name:string ->
  entrypoint:Mavryk_protocol_alpha.Protocol.Alpha_context.Entrypoint.t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Script.expr option
    Mavryk_base.TzPervasives.tzresult ->
  unit Mavryk_base.TzPervasives.tzresult Lwt.t

val list_contract_unreachables : 
  Protocol_client_context.rpc_context ->
  chain:Mavryk_shell_services.Chain_services.chain ->
  block:Mavryk_shell_services.Block_services.block ->
  contract:Mavryk_protocol_alpha.Protocol.Contract_hash.t ->
  Mavryk_protocol_alpha.Protocol.Michelson_v1_primitives.prim list list
    Mavryk_base.TzPervasives.tzresult
    Lwt.t

List paths of unreachable parameters. Only useful to test the stitching, as no such parameter should be allowed in originated contracts.

val list_unreachables : 
  Protocol_client_context.rpc_context ->
  chain:Mavryk_shell_services.Chain_services.chain ->
  block:Mavryk_shell_services.Block_services.block ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Script.expr ->
  Mavryk_protocol_alpha.Protocol.Michelson_v1_primitives.prim list list
    Mavryk_base.TzPervasives.tzresult
    Lwt.t

val print_unreachables : 
  Mavryk_client_base.Client_context.printer ->
  ?on_errors:
    (Mavryk_base.TzPervasives.error list ->
      unit Mavryk_base.TzPervasives.tzresult Lwt.t) ->
  emacs:bool ->
  ?contract:Mavryk_protocol_alpha.Protocol.Contract_hash.t ->
  ?script_name:string ->
  Mavryk_protocol_alpha.Protocol.Michelson_v1_primitives.prim list list
    Mavryk_base.TzPervasives.tzresult ->
  unit Mavryk_base.TzPervasives.tzresult Lwt.t

val list_contract_entrypoints : 
  Protocol_client_context.rpc_context ->
  chain:Mavryk_shell_services.Chain_services.chain ->
  block:Mavryk_shell_services.Block_services.block ->
  contract:Mavryk_protocol_alpha.Protocol.Contract_hash.t ->
  normalize_types:bool ->
  (string * Mavryk_protocol_alpha.Protocol.Alpha_context.Script.expr) list
    Mavryk_base.TzPervasives.tzresult
    Lwt.t

List the contract entrypoints with their types. If their is no explicit default, th type of default entrypoint will still be given.

val list_entrypoints : 
  Protocol_client_context.rpc_context ->
  chain:Mavryk_shell_services.Chain_services.chain ->
  block:Mavryk_shell_services.Block_services.block ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Script.expr ->
  (string * Mavryk_protocol_alpha.Protocol.Alpha_context.Script.expr) list
    Mavryk_base.TzPervasives.tzresult
    Lwt.t

List the script entrypoints with their types.

val print_entrypoints_list : 
  Mavryk_client_base.Client_context.printer ->
  ?on_errors:
    (Mavryk_base.TzPervasives.error list ->
      unit Mavryk_base.TzPervasives.tzresult Lwt.t) ->
  emacs:bool ->
  ?contract:Mavryk_protocol_alpha.Protocol.Contract_hash.t ->
  ?script_name:string ->
  (string * Mavryk_protocol_alpha.Protocol.Alpha_context.Script.expr) list
    Mavryk_base.TzPervasives.tzresult ->
  unit Mavryk_base.TzPervasives.tzresult Lwt.t

Print the contract entrypoints with their types.