Plasma GitLab Archive
Projects Blog Knowledge

sig
  type 'a polyendpoint =
      'Netsys_polypipe.polypipe * 'Netsys_polypipe.polypipe
  type 'a polyclient
  type 'a polyserver
  val create_client : int -> 'Netsys_polysocket.polyclient
  val connect :
    'Netsys_polysocket.polyclient ->
    'Netsys_polysocket.polyserver -> unit
  val endpoint :
    synchronous:bool ->
    nonblock:bool ->
    'Netsys_polysocket.polyclient -> 'Netsys_polysocket.polyendpoint
  val close_client : 'Netsys_polysocket.polyclient -> unit
  val set_connect_notify :
    'Netsys_polysocket.polyclient -> (unit -> unit) -> unit
  val connect_descr : 'Netsys_polysocket.polyclient -> Unix.file_descr
  val create_server : unit -> 'Netsys_polysocket.polyserver
  val accept :
    nonblock:bool ->
    'Netsys_polysocket.polyserver -> 'Netsys_polysocket.polyendpoint
  val refuse : nonblock:bool -> 'Netsys_polysocket.polyserver -> unit
  val pending_connection : 'Netsys_polysocket.polyserver -> bool
  val close_server : 'Netsys_polysocket.polyserver -> unit
  val set_accept_notify :
    'Netsys_polysocket.polyserver -> (unit -> unit) -> unit
  val accept_descr : 'Netsys_polysocket.polyserver -> Unix.file_descr
end
This web site is published by Informatikbüro Gerd Stolpmann
Powered by Caml