sig
val make_daemon : (unit -> unit) -> bool -> unit
external send_file :
src:Unix.file_descr ->
dest:Unix.file_descr -> start:int -> len:int -> int = "stew_sendfile"
external getservent : unit -> Unix.service_entry = "stew_getservent"
external setservent : bool -> unit = "stew_setservent"
external endservent : unit -> unit = "stew_endservent"
end