(**************************************************************************) (* *) (* Copyright (c) 2014 - 2018. *) (* Dynamic Ledger Solutions, Inc. *) (* *) (* All rights reserved. No warranty, explicit or implicit, provided. *) (* *) (**************************************************************************) val commands: unit -> Client_context.io_wallet Clic.command list val encrypted_switch: unit -> (bool, 'a) Clic.arg