external setpriority : which_prio_t -> priority -> unit =
  "caml_extunix_setpriority"