external unlockpt : Unix.file_descr -> unit = "caml_extunix_unlockpt"