* added some fp* functions

This commit is contained in:
armin 2004-11-06 19:57:06 +00:00
parent 784ec6c038
commit 23ebe1907e

View File

@ -685,6 +685,7 @@ function _fcntl (fildes:longint; cmd:longint):longint; cdecl;exter
function open (path:Pchar; oflag:longint;
args:array of const):longint; cdecl;external 'clib' name 'open';
function open (path:Pchar; oflag:longint):longint; cdecl;external 'clib' name 'open';
function fpopen(path:Pchar; oflag:longint):longint; cdecl;external 'clib' name 'open';
function sopen (path:Pchar; oflag, shflag:longint;
args:array of const):longint; cdecl;external 'clib' name 'sopen';
function sopen (path:Pchar; oflag,shflag:longint):longint; cdecl;external 'clib' name 'sopen';
@ -3521,7 +3522,9 @@ function chsize(fildes:longint; size:dword):longint;cdecl;external 'clib' name '
function _close(fildes:longint):longint;cdecl;external 'clib' name 'close';
function Fpclose(fildes:longint):longint;cdecl;external 'clib' name 'close';
function dup(fildes:longint):longint;cdecl;external 'clib' name 'dup';
function fpdup(fildes:longint):longint;cdecl;external 'clib' name 'dup';
function dup2(fildes1:longint; fildes2:longint):longint;cdecl;external 'clib' name 'dup2';
function fpdup2(fildes1:longint; fildes2:longint):longint;cdecl;external 'clib' name 'dup2';
function _eof(fildes:longint):longint;cdecl;external 'clib' name 'eof';
function Fpeof(fildes:longint):longint;cdecl;external 'clib' name 'eof';
function getcwd(path:Pchar; len:Tsize_t):Pchar;cdecl;external 'clib' name 'getcwd';
@ -4889,7 +4892,10 @@ end.
{
$Log$
Revision 1.3 2004-09-26 19:25:49 armin
Revision 1.4 2004-11-06 19:57:06 armin
* added some fp* functions
Revision 1.3 2004/09/26 19:25:49 armin
* exiting threads at nlm unload
Revision 1.2 2003/03/25 18:09:25 armin