paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-13 02:41:50 +02:00
Code Issues Packages Projects Releases Wiki Activity

* FPC_USE_LIBC fixes

Browse Source
This commit is contained in:
marco 2004-01-01 14:09:14 +00:00
parent 4d915e960d
commit fe766b63b3
2 changed files with 11 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/unix/oscdeclh.inc
View File

@ -58,7 +58,7 @@ Type TGrpArr = Array [0..0] of TGid; { C style array workarounds}
// {$endif} // {$endif}
{$ifdef BSD} {$ifdef BSD}
function FPSigProcMask(how:cint;nset : psigset;oset : psigset):cint; external name 'sigprocmask'; function FPSigProcMask(how:cint;nset : psigset;oset : psigset):cint;cdecl; external name 'sigprocmask';
{$endif} {$endif}
function FpStat (path: pchar; var buf : stat): cint; cdecl; external name 'stat'; function FpStat (path: pchar; var buf : stat): cint; cdecl; external name 'stat';
{$ifdef FPC_IS_SYSTEM} {$ifdef FPC_IS_SYSTEM}
@ -91,7 +91,10 @@ Type TGrpArr = Array [0..0] of TGid; { C style array workarounds}
{ {
$Log$ $Log$
Revision 1.3 2003-12-30 15:43:20 marco Revision 1.4 2004-01-01 14:09:14 marco
* FPC_USE_LIBC fixes
Revision 1.3 2003/12/30 15:43:20 marco
* linux now compiles with FPC_USE_LIBC * linux now compiles with FPC_USE_LIBC
Revision 1.2 2003/12/30 12:24:01 marco Revision 1.2 2003/12/30 12:24:01 marco
@ -103,5 +106,4 @@ Type TGrpArr = Array [0..0] of TGid; { C style array workarounds}
Revision 1.1 2002/12/18 16:43:26 marco Revision 1.1 2002/12/18 16:43:26 marco
* new unix rtl, linux part..... * new unix rtl, linux part.....
}
}

7
rtl/unix/unxdeclh.inc
View File

@ -28,11 +28,14 @@ Function fpSetPriority(Which,Who,What:cint):cint; cdecl; external name 'setprior
Function fpLstat(path:pchar;Info:pstat):cint; cdecl; external name 'lstat'; Function fpLstat(path:pchar;Info:pstat):cint; cdecl; external name 'lstat';
Function fpSymlink(oldname,newname:pchar):cint; cdecl; external name 'symlink'; Function fpSymlink(oldname,newname:pchar):cint; cdecl; external name 'symlink';
Function fpReadLink(name,linkname:pchar;maxlen:cint):cint; cdecl; external name 'readlink'; Function fpReadLink(name,linkname:pchar;maxlen:cint):cint; cdecl; external name 'readlink';
function fpgettimeofday(tp: ptimeval;tzp:ptimezone):cint; external name 'gettimeofday'; function fpgettimeofday(tp: ptimeval;tzp:ptimezone):cint; cdecl; external name 'gettimeofday';
{ {
$Log$ $Log$
Revision 1.1 2003-12-30 12:29:16 marco Revision 1.2 2004-01-01 14:09:14 marco
* FPC_USE_LIBC fixes
Revision 1.1 2003/12/30 12:29:16 marco
* FPC_USE_LIBC * FPC_USE_LIBC
Revision 1.1 2003/06/01 15:23:46 marco Revision 1.1 2003/06/01 15:23:46 marco