sig
  val parse_ssh_client :
    unit -> [ `From of Core_unix.Inet_addr.t | `Nowhere ] Or_error.t
end