ligo/src/client/embedded/alpha/client_proto_args.mli

(**************************************************************************)
(*                                                                        *)
(*    Copyright (c) 2014 - 2016.                                          *)
(*    Dynamic Ledger Solutions, Inc. <contact@tezos.com>                  *)
(*                                                                        *)
(*    All rights reserved. No warranty, explicit or implicit, provided.   *)
(*                                                                        *)
(**************************************************************************)

val tez_sym: string

val init_arg: string * Arg.spec * string
val fee_arg: string * Arg.spec * string
val arg_arg: string * Arg.spec * string
val source_arg: string * Arg.spec * string
val delegate_arg: string * Arg.spec * string
val delegatable_args: (string * Arg.spec * string) list
val spendable_args: (string * Arg.spec * string) list
val max_priority_arg: string * Arg.spec * string
val free_mining_arg: string * Arg.spec * string
val force_arg: string * Arg.spec * string
val endorsement_delay_arg: string * Arg.spec * string

val tez_arg :
  name:string ->
  desc:string ->
  default:string ->
  Tez.tez ref * (string * Arg.spec * string)
val tez_param :
  name:string ->
  desc:string ->
  ('a, Client_commands.context, 'ret) Cli_entries.params ->
  (Tez.t -> 'a, Client_commands.context, 'ret) Cli_entries.params

val delegate: string option ref
val source: string option ref
val delegatable: bool ref
val spendable: bool ref
val force: bool ref
val fee: Tez.t ref
val init: string ref
val arg: string option ref
val max_priority: int option ref
val free_mining: bool ref
val endorsement_delay: int ref

module Daemon : sig
  val mining_arg: string * Arg.spec * string
  val endorsement_arg: string * Arg.spec * string
  val denunciation_arg: string * Arg.spec * string
  val all: bool ref
  val mining: bool ref
  val endorsement: bool ref
  val denunciation: bool ref
end