<html><head> <link rel="stylesheet" href="style.css" type="text/css"> <meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> <link rel="Start" href="index.html"> <link title="Index of types" rel=Appendix href="index_types.html"> <link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> <link title="Index of values" rel=Appendix href="index_values.html"> <link title="Index of modules" rel=Appendix href="index_modules.html"> <link title="Index of module types" rel=Appendix href="index_module_types.html"> <link title="Bitcoin" rel="Chapter" href="Bitcoin.html"> <link title="Bitcoin_ocamlnet" rel="Chapter" href="Bitcoin_ocamlnet.html"><title>Bitcoin</title> </head> <body> <code class="code"><span class="keyword">sig</span><br> <span class="keyword">exception</span> <span class="constructor">Unspecified_connection</span><br> <span class="keyword">exception</span> <span class="constructor">Bitcoin_error</span> <span class="keyword">of</span> int * string<br> <span class="keyword">exception</span> <span class="constructor">Internal_error</span> <span class="keyword">of</span> int * string<br> <span class="keyword">exception</span> <span class="constructor">Httpclient_error</span> <span class="keyword">of</span> exn<br> <span class="keyword">type</span> address_t = string<br> <span class="keyword">type</span> account_t = [ <span class="keywordsign">`</span><span class="constructor">Default</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Named</span> <span class="keyword">of</span> string ]<br> <span class="keyword">type</span> amount_t = int64<br> <span class="keyword">type</span> txid_t = string<br> <span class="keyword">type</span> txoutput_t = <span class="constructor">Bitcoin</span>.txid_t * int<br> <span class="keyword">type</span> blkhash_t = string<br> <span class="keyword">type</span> priv_t = string<br> <span class="keyword">type</span> pub_t = string<br> <span class="keyword">type</span> sig_t = string<br> <span class="keyword">type</span> sigcomp_t = [ <span class="keywordsign">`</span><span class="constructor">All</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">None</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Single</span> ]<br> <span class="keyword">type</span> hextx_t = string<br> <span class="keyword">type</span> hexspk_t = string<br> <span class="keyword">type</span> hexblk_t = string<br> <span class="keyword">type</span> hexwork_t = string<br> <span class="keyword">type</span> node_t = string<br> <span class="keyword">type</span> addnodeop_t = [ <span class="keywordsign">`</span><span class="constructor">Add</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Onetry</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Remove</span> ]<br> <span class="keyword">type</span> lockop_t = [ <span class="keywordsign">`</span><span class="constructor">Lock</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Unlock</span> ]<br> <span class="keyword">type</span> assoc_t = (string * <span class="constructor">Yojson</span>.<span class="constructor">Safe</span>.json) list<br> <span class="keyword">type</span> conn_t = {<br> inet_addr : <span class="constructor">Unix</span>.inet_addr;<br> host : string;<br> port : int;<br> username : string;<br> password : string;<br> }<br> <span class="keyword">module</span> <span class="keyword">type</span> <span class="constructor">HTTPCLIENT</span> =<br> <span class="keyword">sig</span><br> <span class="keyword">module</span> <span class="constructor">Monad</span> :<br> <span class="keyword">sig</span><br> <span class="keyword">type</span> <span class="keywordsign">'</span>a t<br> <span class="keyword">val</span> return : <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">Bitcoin</span>.<span class="constructor">HTTPCLIENT</span>.<span class="constructor">Monad</span>.t<br> <span class="keyword">val</span> fail : exn <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">Bitcoin</span>.<span class="constructor">HTTPCLIENT</span>.<span class="constructor">Monad</span>.t<br> <span class="keyword">val</span> bind :<br> <span class="keywordsign">'</span>a <span class="constructor">Bitcoin</span>.<span class="constructor">HTTPCLIENT</span>.<span class="constructor">Monad</span>.t <span class="keywordsign">-></span><br> (<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">Bitcoin</span>.<span class="constructor">HTTPCLIENT</span>.<span class="constructor">Monad</span>.t) <span class="keywordsign">-></span><br> <span class="keywordsign">'</span>b <span class="constructor">Bitcoin</span>.<span class="constructor">HTTPCLIENT</span>.<span class="constructor">Monad</span>.t<br> <span class="keyword">val</span> catch :<br> (unit <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">Bitcoin</span>.<span class="constructor">HTTPCLIENT</span>.<span class="constructor">Monad</span>.t) <span class="keywordsign">-></span><br> (exn <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">Bitcoin</span>.<span class="constructor">HTTPCLIENT</span>.<span class="constructor">Monad</span>.t) <span class="keywordsign">-></span><br> <span class="keywordsign">'</span>a <span class="constructor">Bitcoin</span>.<span class="constructor">HTTPCLIENT</span>.<span class="constructor">Monad</span>.t<br> <span class="keyword">end</span><br> <span class="keyword">val</span> post_string :<br> headers:(string * string) list <span class="keywordsign">-></span><br> inet_addr:<span class="constructor">Unix</span>.inet_addr <span class="keywordsign">-></span><br> host:string <span class="keywordsign">-></span><br> port:int <span class="keywordsign">-></span> uri:string <span class="keywordsign">-></span> string <span class="keywordsign">-></span> string <span class="constructor">Bitcoin</span>.<span class="constructor">HTTPCLIENT</span>.<span class="constructor">Monad</span>.t<br> <span class="keyword">end</span><br> <span class="keyword">module</span> <span class="keyword">type</span> <span class="constructor">CONNECTION</span> = <span class="keyword">sig</span> <span class="keyword">val</span> default : <span class="constructor">Bitcoin</span>.conn_t option <span class="keyword">end</span><br> <span class="keyword">module</span> <span class="keyword">type</span> <span class="constructor">ENGINE</span> =<br> <span class="keyword">sig</span><br> <span class="keyword">type</span> <span class="keywordsign">'</span>a monad_t<br> <span class="keyword">val</span> addnode :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.node_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.addnodeop_t <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> backupwallet :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> createmultisig :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> int <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.pub_t list <span class="keywordsign">-></span><br> (<span class="constructor">Bitcoin</span>.address_t * <span class="constructor">Bitcoin</span>.hexspk_t) <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> createrawtransaction :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.txoutput_t list <span class="keywordsign">-></span><br> (<span class="constructor">Bitcoin</span>.address_t * <span class="constructor">Bitcoin</span>.amount_t) list <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.hextx_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> decoderawtransaction :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.hextx_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> dumpprivkey :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.address_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.priv_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> encryptwallet :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getaccount :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.address_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.account_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getaccountaddress :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.address_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getaddednodeinfo :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?node:<span class="constructor">Bitcoin</span>.node_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getaddednodeinfo_verbose :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?node:<span class="constructor">Bitcoin</span>.node_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t list <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getaddressesbyaccount :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.address_t list <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getbalance :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?account:<span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.amount_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getblock :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.blkhash_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getblockcount :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> int <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getblockhash :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> int <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.blkhash_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getblocktemplate :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?obj:<span class="constructor">Bitcoin</span>.assoc_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getconnectioncount :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> int <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getdifficulty :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> float <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getgenerate :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> bool <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> gethashespersec :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> int <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getinfo :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getmininginfo :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getnewaddress :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?account:<span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.address_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getpeerinfo :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t list <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getrawmempool :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.txid_t list <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getrawtransaction :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.txid_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.hextx_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getrawtransaction_verbose :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.txid_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getreceivedbyaccount :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.amount_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getreceivedbyaddress :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.address_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.amount_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> gettransaction :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.txid_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> gettxout :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?includemempool:bool <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.txoutput_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> gettxoutsetinfo :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getwork_with_data :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.hexwork_t <span class="keywordsign">-></span> bool <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> getwork_without_data :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> importprivkey :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?account:<span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span><br> ?rescan:bool <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.priv_t <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> keypoolrefill :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> listaccounts :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span><br> (<span class="constructor">Bitcoin</span>.account_t * <span class="constructor">Bitcoin</span>.amount_t) list <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> listaddressgroupings :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span><br> (<span class="constructor">Bitcoin</span>.address_t * <span class="constructor">Bitcoin</span>.amount_t * <span class="constructor">Bitcoin</span>.account_t) list list<br> <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> listlockunspent :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.txoutput_t list <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> listreceivedbyaccount :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?includeempty:bool <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span><br> (<span class="constructor">Bitcoin</span>.account_t * <span class="constructor">Bitcoin</span>.amount_t * int) list<br> <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> listreceivedbyaddress :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?includeempty:bool <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span><br> (<span class="constructor">Bitcoin</span>.address_t * <span class="constructor">Bitcoin</span>.account_t * <span class="constructor">Bitcoin</span>.amount_t * int) list<br> <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> listsinceblock :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?blockhash:<span class="constructor">Bitcoin</span>.blkhash_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span><br> (<span class="constructor">Bitcoin</span>.assoc_t list * <span class="constructor">Bitcoin</span>.blkhash_t) <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> listtransactions :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?account:<span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span><br> ?count:int <span class="keywordsign">-></span><br> ?from:int <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t list <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> listunspent :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?maxconf:int <span class="keywordsign">-></span><br> ?addresses:<span class="constructor">Bitcoin</span>.address_t list <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t list <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> lockunspent :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?outputs:<span class="constructor">Bitcoin</span>.txoutput_t list <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.lockop_t <span class="keywordsign">-></span> bool <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> move :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?comment:string <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.amount_t <span class="keywordsign">-></span> bool <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> sendfrom :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?comment:string <span class="keywordsign">-></span><br> ?recipient:string <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.address_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.amount_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.txid_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> sendmany :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?comment:string <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span><br> (<span class="constructor">Bitcoin</span>.address_t * <span class="constructor">Bitcoin</span>.amount_t) list <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.txid_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> sendrawtransaction :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.hextx_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.txid_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> sendtoaddress :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?comment:string <span class="keywordsign">-></span><br> ?recipient:string <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.address_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.amount_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.txid_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> setaccount :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.address_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.account_t <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> setgenerate :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?genproclimit:int <span class="keywordsign">-></span> bool <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> settxfee :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.amount_t <span class="keywordsign">-></span> bool <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> signmessage :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.address_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.sig_t <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> signrawtransaction :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> ?parents:(<span class="constructor">Bitcoin</span>.txoutput_t * <span class="constructor">Bitcoin</span>.hexspk_t) list <span class="keywordsign">-></span><br> ?keys:<span class="constructor">Bitcoin</span>.priv_t list <span class="keywordsign">-></span><br> ?sighash:<span class="constructor">Bitcoin</span>.sigcomp_t * bool <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.hextx_t <span class="keywordsign">-></span> (<span class="constructor">Bitcoin</span>.hextx_t * bool) <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> submitblock :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.hexblk_t <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> validateaddress :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.address_t <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.assoc_t option <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> verifymessage :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.address_t <span class="keywordsign">-></span><br> <span class="constructor">Bitcoin</span>.sig_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> bool <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> walletlock :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> walletpassphrase :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> int <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">val</span> walletpassphrasechange :<br> ?conn:<span class="constructor">Bitcoin</span>.conn_t <span class="keywordsign">-></span><br> string <span class="keywordsign">-></span> string <span class="keywordsign">-></span> unit <span class="constructor">Bitcoin</span>.<span class="constructor">ENGINE</span>.monad_t<br> <span class="keyword">end</span><br> <span class="keyword">val</span> amount_of_float : float <span class="keywordsign">-></span> <span class="constructor">Bitcoin</span>.amount_t<br> <span class="keyword">val</span> float_of_amount : <span class="constructor">Bitcoin</span>.amount_t <span class="keywordsign">-></span> float<br> <span class="keyword">module</span> <span class="constructor">Make</span> :<br> <span class="keyword">functor</span> (<span class="constructor">Httpclient</span> : <span class="constructor">HTTPCLIENT</span>) <span class="keywordsign">-></span><br> <span class="keyword">functor</span> (<span class="constructor">Connection</span> : <span class="constructor">CONNECTION</span>) <span class="keywordsign">-></span><br> <span class="keyword">sig</span><br> <span class="keyword">type</span> <span class="keywordsign">'</span>a monad_t = <span class="keywordsign">'</span>a <span class="constructor">Httpclient</span>.<span class="constructor">Monad</span>.t<br> <span class="keyword">val</span> addnode : ?conn:conn_t <span class="keywordsign">-></span> node_t <span class="keywordsign">-></span> addnodeop_t <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> backupwallet : ?conn:conn_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> createmultisig :<br> ?conn:conn_t <span class="keywordsign">-></span><br> int <span class="keywordsign">-></span> pub_t list <span class="keywordsign">-></span> (address_t * hexspk_t) monad_t<br> <span class="keyword">val</span> createrawtransaction :<br> ?conn:conn_t <span class="keywordsign">-></span><br> txoutput_t list <span class="keywordsign">-></span> (address_t * amount_t) list <span class="keywordsign">-></span> hextx_t monad_t<br> <span class="keyword">val</span> decoderawtransaction :<br> ?conn:conn_t <span class="keywordsign">-></span> hextx_t <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> dumpprivkey : ?conn:conn_t <span class="keywordsign">-></span> address_t <span class="keywordsign">-></span> priv_t monad_t<br> <span class="keyword">val</span> encryptwallet : ?conn:conn_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> getaccount : ?conn:conn_t <span class="keywordsign">-></span> address_t <span class="keywordsign">-></span> account_t monad_t<br> <span class="keyword">val</span> getaccountaddress :<br> ?conn:conn_t <span class="keywordsign">-></span> account_t <span class="keywordsign">-></span> address_t monad_t<br> <span class="keyword">val</span> getaddednodeinfo :<br> ?conn:conn_t <span class="keywordsign">-></span> ?node:node_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> getaddednodeinfo_verbose :<br> ?conn:conn_t <span class="keywordsign">-></span> ?node:node_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t list monad_t<br> <span class="keyword">val</span> getaddressesbyaccount :<br> ?conn:conn_t <span class="keywordsign">-></span> account_t <span class="keywordsign">-></span> address_t list monad_t<br> <span class="keyword">val</span> getbalance :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?account:account_t <span class="keywordsign">-></span> ?minconf:int <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> amount_t monad_t<br> <span class="keyword">val</span> getblock : ?conn:conn_t <span class="keywordsign">-></span> blkhash_t <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> getblockcount : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> int monad_t<br> <span class="keyword">val</span> getblockhash : ?conn:conn_t <span class="keywordsign">-></span> int <span class="keywordsign">-></span> blkhash_t monad_t<br> <span class="keyword">val</span> getblocktemplate :<br> ?conn:conn_t <span class="keywordsign">-></span> ?obj:assoc_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> getconnectioncount : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> int monad_t<br> <span class="keyword">val</span> getdifficulty : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> float monad_t<br> <span class="keyword">val</span> getgenerate : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> bool monad_t<br> <span class="keyword">val</span> gethashespersec : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> int monad_t<br> <span class="keyword">val</span> getinfo : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> getmininginfo : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> getnewaddress :<br> ?conn:conn_t <span class="keywordsign">-></span> ?account:account_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> address_t monad_t<br> <span class="keyword">val</span> getpeerinfo : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t list monad_t<br> <span class="keyword">val</span> getrawmempool : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> txid_t list monad_t<br> <span class="keyword">val</span> getrawtransaction : ?conn:conn_t <span class="keywordsign">-></span> txid_t <span class="keywordsign">-></span> hextx_t monad_t<br> <span class="keyword">val</span> getrawtransaction_verbose :<br> ?conn:conn_t <span class="keywordsign">-></span> txid_t <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> getreceivedbyaccount :<br> ?conn:conn_t <span class="keywordsign">-></span> ?minconf:int <span class="keywordsign">-></span> account_t <span class="keywordsign">-></span> amount_t monad_t<br> <span class="keyword">val</span> getreceivedbyaddress :<br> ?conn:conn_t <span class="keywordsign">-></span> ?minconf:int <span class="keywordsign">-></span> address_t <span class="keywordsign">-></span> amount_t monad_t<br> <span class="keyword">val</span> gettransaction : ?conn:conn_t <span class="keywordsign">-></span> txid_t <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> gettxout :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?includemempool:bool <span class="keywordsign">-></span> txoutput_t <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> gettxoutsetinfo : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> getwork_with_data : ?conn:conn_t <span class="keywordsign">-></span> hexwork_t <span class="keywordsign">-></span> bool monad_t<br> <span class="keyword">val</span> getwork_without_data : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t monad_t<br> <span class="keyword">val</span> importprivkey :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?account:account_t <span class="keywordsign">-></span> ?rescan:bool <span class="keywordsign">-></span> priv_t <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> keypoolrefill : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> listaccounts :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> (account_t * amount_t) list monad_t<br> <span class="keyword">val</span> listaddressgroupings :<br> ?conn:conn_t <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> (address_t * amount_t * account_t) list list monad_t<br> <span class="keyword">val</span> listlockunspent :<br> ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> txoutput_t list monad_t<br> <span class="keyword">val</span> listreceivedbyaccount :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?includeempty:bool <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> (account_t * amount_t * int) list monad_t<br> <span class="keyword">val</span> listreceivedbyaddress :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?includeempty:bool <span class="keywordsign">-></span><br> unit <span class="keywordsign">-></span> (address_t * account_t * amount_t * int) list monad_t<br> <span class="keyword">val</span> listsinceblock :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?blockhash:blkhash_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> (assoc_t list * blkhash_t) monad_t<br> <span class="keyword">val</span> listtransactions :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?account:account_t <span class="keywordsign">-></span><br> ?count:int <span class="keywordsign">-></span> ?from:int <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t list monad_t<br> <span class="keyword">val</span> listunspent :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?maxconf:int <span class="keywordsign">-></span><br> ?addresses:address_t list <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> assoc_t list monad_t<br> <span class="keyword">val</span> lockunspent :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?outputs:txoutput_t list <span class="keywordsign">-></span> lockop_t <span class="keywordsign">-></span> bool monad_t<br> <span class="keyword">val</span> move :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?comment:string <span class="keywordsign">-></span><br> account_t <span class="keywordsign">-></span> account_t <span class="keywordsign">-></span> amount_t <span class="keywordsign">-></span> bool monad_t<br> <span class="keyword">val</span> sendfrom :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?comment:string <span class="keywordsign">-></span><br> ?recipient:string <span class="keywordsign">-></span><br> account_t <span class="keywordsign">-></span> address_t <span class="keywordsign">-></span> amount_t <span class="keywordsign">-></span> txid_t monad_t<br> <span class="keyword">val</span> sendmany :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?minconf:int <span class="keywordsign">-></span><br> ?comment:string <span class="keywordsign">-></span><br> account_t <span class="keywordsign">-></span> (address_t * amount_t) list <span class="keywordsign">-></span> txid_t monad_t<br> <span class="keyword">val</span> sendrawtransaction : ?conn:conn_t <span class="keywordsign">-></span> hextx_t <span class="keywordsign">-></span> txid_t monad_t<br> <span class="keyword">val</span> sendtoaddress :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?comment:string <span class="keywordsign">-></span><br> ?recipient:string <span class="keywordsign">-></span> address_t <span class="keywordsign">-></span> amount_t <span class="keywordsign">-></span> txid_t monad_t<br> <span class="keyword">val</span> setaccount :<br> ?conn:conn_t <span class="keywordsign">-></span> address_t <span class="keywordsign">-></span> account_t <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> setgenerate :<br> ?conn:conn_t <span class="keywordsign">-></span> ?genproclimit:int <span class="keywordsign">-></span> bool <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> settxfee : ?conn:conn_t <span class="keywordsign">-></span> amount_t <span class="keywordsign">-></span> bool monad_t<br> <span class="keyword">val</span> signmessage :<br> ?conn:conn_t <span class="keywordsign">-></span> address_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> sig_t monad_t<br> <span class="keyword">val</span> signrawtransaction :<br> ?conn:conn_t <span class="keywordsign">-></span><br> ?parents:(txoutput_t * hexspk_t) list <span class="keywordsign">-></span><br> ?keys:priv_t list <span class="keywordsign">-></span><br> ?sighash:sigcomp_t * bool <span class="keywordsign">-></span> hextx_t <span class="keywordsign">-></span> (hextx_t * bool) monad_t<br> <span class="keyword">val</span> submitblock : ?conn:conn_t <span class="keywordsign">-></span> hexblk_t <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> validateaddress :<br> ?conn:conn_t <span class="keywordsign">-></span> address_t <span class="keywordsign">-></span> assoc_t option monad_t<br> <span class="keyword">val</span> verifymessage :<br> ?conn:conn_t <span class="keywordsign">-></span> address_t <span class="keywordsign">-></span> sig_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> bool monad_t<br> <span class="keyword">val</span> walletlock : ?conn:conn_t <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> walletpassphrase :<br> ?conn:conn_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> int <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">val</span> walletpassphrasechange :<br> ?conn:conn_t <span class="keywordsign">-></span> string <span class="keywordsign">-></span> string <span class="keywordsign">-></span> unit monad_t<br> <span class="keyword">end</span><br> <span class="keyword">end</span></code></body></html>