<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <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 rel="previous" href="Versioned_typed_tcp.Make.Server.html"> <link rel="Up" href="Versioned_typed_tcp.Make.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="Command" rel="Chapter" href="Command.html"> <link title="File_tail" rel="Chapter" href="File_tail.html"> <link title="File_writer" rel="Chapter" href="File_writer.html"> <link title="Import" rel="Chapter" href="Import.html"> <link title="Lock_file" rel="Chapter" href="Lock_file.html"> <link title="Log" rel="Chapter" href="Log.html"> <link title="Persistent_singleton" rel="Chapter" href="Persistent_singleton.html"> <link title="Rpc" rel="Chapter" href="Rpc.html"> <link title="Rpc_intf" rel="Chapter" href="Rpc_intf.html"> <link title="Std" rel="Chapter" href="Std.html"> <link title="Tcp" rel="Chapter" href="Tcp.html"> <link title="Tcp_file" rel="Chapter" href="Tcp_file.html"> <link title="Typed_tcp" rel="Chapter" href="Typed_tcp.html"> <link title="Typed_tcp_intf" rel="Chapter" href="Typed_tcp_intf.html"> <link title="Unpack_sequence" rel="Chapter" href="Unpack_sequence.html"> <link title="User_and_group" rel="Chapter" href="User_and_group.html"> <link title="Versioned_rpc" rel="Chapter" href="Versioned_rpc.html"> <link title="Versioned_typed_tcp" rel="Chapter" href="Versioned_typed_tcp.html"> <link title="Weak_hashtbl" rel="Chapter" href="Weak_hashtbl.html"><title>Versioned_typed_tcp.Make.Client</title> </head> <body> <div class="navbar"><a class="pre" href="Versioned_typed_tcp.Make.Server.html" title="Versioned_typed_tcp.Make.Server">Previous</a> <a class="up" href="Versioned_typed_tcp.Make.html" title="Versioned_typed_tcp.Make">Up</a> </div> <h1>Module <a href="type_Versioned_typed_tcp.Make.Client.html">Versioned_typed_tcp.Make.Client</a></h1> <pre><span class="keyword">module</span> Client: <code class="code">sig</code> <a href="Versioned_typed_tcp.Make.Client.html">..</a> <code class="code">end</code></pre><hr width="100%"> <pre><code><span id="TYPEt"><span class="keyword">type</span> <code class="type"></code>t</span> = {</code></pre><table class="typetable"> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span id="TYPEELTt.remote_ip">remote_ip</span> : <code class="type">Import.Unix.Inet_addr.t</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span id="TYPEELTt.remote_port">remote_port</span> : <code class="type">int</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span id="TYPEELTt.expected_remote_name">expected_remote_name</span> : <code class="type">Remote_name.t</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span id="TYPEELTt.check_remote_name">check_remote_name</span> : <code class="type">bool</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span id="TYPEELTt.logfun">logfun</span> : <code class="type"><a href="Versioned_typed_tcp.Make.html#TYPElogfun">Versioned_typed_tcp.Make.logfun</a> option</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span id="TYPEELTt.my_name">my_name</span> : <code class="type">My_name.t</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span id="TYPEELTt.messages">messages</span> : <code class="type">(Remote_name.t, Recv.t) <a href="Versioned_typed_tcp.Client_msg.html#TYPEt">Versioned_typed_tcp.Client_msg.t</a> Import.Tail.t</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span id="TYPEELTt.queue">queue</span> : <code class="type">(Send.t * [ `Dropped | `Sent of Core.Std.Time.t ] Import.Ivar.t)<br> Core.Std.Queue.t</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span class="keyword">mutable </span><span id="TYPEELTt.con">con</span> : <code class="type">[ `Connected of Versioned_typed_tcp.Make.Connection.t<br> | `Connecting of unit -> unit<br> | `Disconnected ]</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span class="keyword">mutable </span><span id="TYPEELTt.trying_to_connect">trying_to_connect</span> : <code class="type">[ `No | `Yes of unit Import.Ivar.t ]</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span class="keyword">mutable </span><span id="TYPEELTt.connect_complete">connect_complete</span> : <code class="type">unit Import.Ivar.t</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span class="keyword">mutable </span><span id="TYPEELTt.ok_to_connect">ok_to_connect</span> : <code class="type">unit Import.Ivar.t</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span id="TYPEELTt.now">now</span> : <code class="type">unit -> Core.Std.Time.t</code>;</code></td> </tr> <tr> <td align="left" valign="top" > <code> </code></td> <td align="left" valign="top" > <code><span class="keyword">mutable </span><span id="TYPEELTt.last_connect_error">last_connect_error</span> : <code class="type">exn option</code>;</code></td> </tr></table> } <pre><span id="VALconnect"><span class="keyword">val</span> connect</span> : <code class="type"><a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -> unit Import.Ivar.Deferred.t</code></pre> <pre><span id="VALflushed"><span class="keyword">val</span> flushed</span> : <code class="type"><a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -><br> [> `Flushed | `Pending of Core.Std.Time.t Async_unix.Import.Deferred.t ]</code></pre> <pre><span id="VALlisten"><span class="keyword">val</span> listen</span> : <code class="type"><a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -><br> (Remote_name.t, Recv.t) <a href="Versioned_typed_tcp.Client_msg.html#TYPEt">Versioned_typed_tcp.Client_msg.t</a> Import.Tail.Stream.t</code></pre> <pre><span id="VALlisten_ignore_errors"><span class="keyword">val</span> listen_ignore_errors</span> : <code class="type">?stop:unit Import.Deferred.t -><br> <a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -> Recv.t Import.Stream.t</code></pre> <pre><span id="VALsend"><span class="keyword">val</span> send</span> : <code class="type"><a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -><br> Send.t -> [ `Dropped | `Sent of Core.Std.Time.t ] Import.Ivar.Deferred.t</code></pre> <pre><span id="VALclose_connection"><span class="keyword">val</span> close_connection</span> : <code class="type"><a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -> unit</code></pre> <pre><span id="VALconnect"><span class="keyword">val</span> connect</span> : <code class="type"><a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -> unit Import.Ivar.Deferred.t</code></pre> <pre><span id="VALsend_ignore_errors"><span class="keyword">val</span> send_ignore_errors</span> : <code class="type"><a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -> Send.t -> unit</code></pre> <pre><span id="VALstate"><span class="keyword">val</span> state</span> : <code class="type"><a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -><br> [> `Connected | `Connecting | `Disconnected ]</code></pre> <pre><span id="VALcreate"><span class="keyword">val</span> create</span> : <code class="type">?logfun:<a href="Versioned_typed_tcp.Make.html#TYPElogfun">Versioned_typed_tcp.Make.logfun</a> -><br> ?now:(unit -> Core.Std.Time.t) -><br> ?check_remote_name:bool -><br> ip:string -><br> port:int -><br> expected_remote_name:Remote_name.t -><br> My_name.t -> <a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> Async_core.Deferred.t</code></pre> <pre><span id="VALlast_connect_error"><span class="keyword">val</span> last_connect_error</span> : <code class="type"><a href="Versioned_typed_tcp.Make.Client.html#TYPEt">t</a> -> exn option</code></pre></body></html>