ligo/src/bin_client/main_admin.ml

20 lines
940 B
OCaml
Raw Normal View History

2016-10-16 23:57:56 +04:00
(**************************************************************************)
(* *)
2018-02-06 00:17:03 +04:00
(* Copyright (c) 2014 - 2018. *)
2016-10-16 23:57:56 +04:00
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
(* *)
(* All rights reserved. No warranty, explicit or implicit, provided. *)
(* *)
(**************************************************************************)
let select_commands _ _ =
return
(List.flatten
2018-02-14 17:15:54 +04:00
[ Client_report_commands.commands () ;
Client_admin_commands.commands () ;
2018-02-16 04:26:24 +04:00
Client_p2p_commands.commands () ;
Client_protocols_commands.commands () ;
Client_rpc_commands.commands ])
let () = Client_main_run.run select_commands