gazagnaire.org / ocaml-ltp
Licklider Transmission Protocol (CCSDS 734.1-B) for reliable DTN links
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

ltp: add pp for LTP connection type (merlint E415)

Thomas Gazagnaire 729fca9b a5f0b8fd

+5
+2
eio/ltp_eio.ml
··· 37 37 buf_r : Eio.Buf_read.t; 38 38 } 39 39 40 + let pp ppf _t = Fmt.string ppf "<LTP connection>" 41 + 40 42 let connect ~sw ~net ~host ~port = 41 43 Log.info (fun m -> m "Connecting to %s:%d" host port); 42 44 let addr = `Tcp (Eio.Net.Ipaddr.of_raw host, port) in
+3
eio/ltp_eio.mli
··· 33 33 type t 34 34 (** An LTP transport connection. *) 35 35 36 + val pp : t Fmt.t 37 + (** [pp t] formats a connection. *) 38 + 36 39 val connect : 37 40 sw:Eio.Switch.t -> 38 41 net:[> [ `Generic ] Eio.Net.ty ] Eio.Resource.t ->