ligo/src/proto_alpha/lib_client/client_proto_main.ml

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

let protocol =
  Protocol_hash.of_b58check_exn
    "ProtoALphaALphaALphaALphaALphaALphaALphaALphaDdp3zK"

let () =
  Client_commands.register protocol @@
  List.map (Cli_entries.map_command (new Proto_alpha.wrap_full_context)) @@
  Client_proto_programs_commands.commands () @
  Client_proto_contracts_commands.commands () @
  Client_proto_context_commands.commands () @
  Client_baking_main.commands ()
First public release 2016-09-08 21:13:10 +04:00			`(**************************************************************************)`
			`(* *)`
Update copyright notice (2018) 2018-02-06 00:17:03 +04:00			`(* Copyright (c) 2014 - 2018. *)`
First public release 2016-09-08 21:13:10 +04:00			`(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)`
			`(* *)`
			`(* All rights reserved. No warranty, explicit or implicit, provided. *)`
			`(* *)`
			`(**************************************************************************)`

			`let protocol =`
Client: a bit of `Error_monad` in `Hash` 2017-04-05 11:54:21 +04:00			`Protocol_hash.of_b58check_exn`
Switch to Base58. Base48 was fun but... hell yeah... let's stay standard. Public encoding of hash: ``` Block: "B..." (len: 51) Operation: "o..." (len: 51) Protocol: "P..." (len: 51) Ed25519: "tz1.." (len: 36) Contract: "TZ1.." (len: 36) NetworkdId: "id.." (len: 30) ``` Other internal prefixes (in the RPC): ``` Hash of Michelson's expression: "expr..." (len: 54) Ed25519 public key: "edpk..." (len: 54) Ed25519 secret key: "edsk..." (len: 98) Ed25519 signature: "edsig.." (len: 99) Hash of a random seed nonce: "nce...." (len: 53) Random seed: "rng...." (len: 53) ``` 2017-02-19 21:22:32 +04:00			`"ProtoALphaALphaALphaALphaALphaALphaALphaALphaDdp3zK"`
First public release 2016-09-08 21:13:10 +04:00
			`let () =`
Client: add a context to command evaluation. 2016-12-03 16:05:02 +04:00			`Client_commands.register protocol @@`
Client: introduce an alternative context alpha's commands 2018-02-11 22:17:40 +04:00			`List.map (Cli_entries.map_command (new Proto_alpha.wrap_full_context)) @@`
Client library refactor 2017-11-07 20:38:11 +04:00			`Client_proto_programs_commands.commands () @`
			`Client_proto_contracts_commands.commands () @`
			`Client_proto_context_commands.commands () @`
			`Client_baking_main.commands ()`