sig
  type t = { name : string; aliases : string array; proto : int; }
  val getbyname : string -> Unix.Protocol.t option
  val getbyname_exn : string -> Unix.Protocol.t
  val getbynumber : int -> Unix.Protocol.t option
  val getbynumber_exn : int -> Unix.Protocol.t
  val t_of_sexp : Sexplib.Sexp.t -> Unix.Protocol.t
  val sexp_of_t : Unix.Protocol.t -> Sexplib.Sexp.t
end