(* Return the EOF indicator for STREAM. *)
function feof(__stream:pfile):integer;cdecl;external 'c';
(* Return the error indicator for STREAM. *)
function ferror(__stream:pfile):integer;cdecl;external 'c';
(* Faster versions when locking is not required. *)
procedure clearerr_unlocked(__stream:pfile);cdecl;external 'c';
function feof_unlocked(__stream:pfile):integer;cdecl;external 'c';
function ferror_unlocked(__stream:pfile):integer;cdecl;external 'c';
(* Print a message describing the meaning of the value of errno. *)
procedure perror(__s:pchar);cdecl;external 'c';
(* Return the system file descriptor for STREAM. *)
function fileno(__stream:pfile):longint;cdecl;external 'c';
(* Faster version when locking is not required. *)
function fileno_unlocked(__stream:pfile):integer;cdecl;external 'c';
(* Create a new stream connected to a pipe running the given command. *)
function pipeopen(__command, __modes:pchar):pfile;cdecl;external 'c' name 'popen';
(* Close a stream opened by popen and return the status of its child. *)
function pipeclose (__stream:pfile):integer;cdecl;external 'c' name 'pclose';
(* Return the name of the controlling terminal. *)
function ctermid(__s:pchar):pchar;cdecl;external 'c';
(* Return the name of the current user. *)
function cuserid(__s:pchar):pchar;cdecl;external 'c';
(* Acquire ownership of STREAM. *)
procedure flockfile(__stream:pfile);cdecl;external 'c';
(* Try to acquire ownership of STREAM but do not block if it is not
possible. *)
function ftrylockfile(__stream:pfile):integer;cdecl;external 'c';
(* Relinquish the ownership granted for STREAM. *)
procedure funlockfile(__stream:pfile);cdecl;external 'c';
(* создание файла *)
function fdCreat(PathName:Pchar;mode:longint):longint;cdecl;external 'c' name 'creat';
(* "перемотка" указателя на первый элемент каталога *)