wip: debug echo server

This commit is contained in:
Simon Cruanes 2025-07-09 18:31:27 -04:00
parent 6c4fb69d23
commit f5993408c0
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4

View file

@ -26,7 +26,7 @@ let main ~port ~runner:_ () : unit Lwt.t =
~data:(fun () -> [ "addr", `String (str_of_sockaddr client_addr) ]) ~data:(fun () -> [ "addr", `String (str_of_sockaddr client_addr) ])
in in
Printf.printf "got new client\n%!"; Printf.printf "got new client on %s\n%!" (str_of_sockaddr client_addr);
let buf = Bytes.create 32 in let buf = Bytes.create 32 in
let continue = ref true in let continue = ref true in