val connect :
?timeout:float ->
< Cap.network.. > ->
host:string ->
port:int ->
unit ->
Unix.file_descrval send_all : Unix.file_descr -> string -> unitval receive_all : Unix.file_descr -> stringval exchange :
?timeout:float ->
< Cap.network.. > ->
host:string ->
port:int ->
string ->
string