sig
  val daemonize :
    ?close_stdio:bool -> ?cd:string -> ?umask:int -> unit -> unit
  val daemonize_wait : ?cd:string -> ?umask:int -> unit -> unit -> unit
end