external setpgid : int -> int -> unit = "caml_extunix_setpgid"