external
read_credentials :
Unix
.file_descr
->
(int * int * int) =
"caml_extunix_read_credentials"