paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 18:09:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* small fix

Browse Source
This commit is contained in:
marco 2003-09-15 20:29:50 +00:00
parent cf0c2af370
commit 25beeda7b5
2 changed files with 11 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/linux/ossysc.inc
View File

@ -443,18 +443,21 @@ end;
// The following belongs here, but this should be researched more.
// function Fpgetcwd(pt:pchar; _size:size_t):pchar;[public, alias :'FPC_SYSC_GETCWD'];
function gettimeofday(tp: ptimeval;tzp:ptimezone):cint; [public, alias:
function fpgettimeofday(tp: ptimeval;tzp:ptimezone):cint; [public, alias:
'FPC_SYSC_GETTIMEOFDAY'];
begin
gettimeofday:=do_syscall(syscall_nr_gettimeofday,TSysParam(tp),TSysParam(tzp));
fpgettimeofday:=do_syscall(syscall_nr_gettimeofday,TSysParam(tp),TSysParam(tzp));
end;
{$ENDIF}
{
$Log$
Revision 1.4 2003-09-14 20:15:01 marco
Revision 1.5 2003-09-15 20:29:50 marco
* small fix
Revision 1.4 2003/09/14 20:15:01 marco
* Unix reform stage two. Remove all calls from Unix that exist in Baseunix.
Revision 1.3 2003/05/11 16:07:55 jonas

7
rtl/linux/ossysch.inc
View File

@ -21,11 +21,14 @@ Function FpIOCtl(handle:cint;ndx:culong;Data: Pointer):cint; external name 'FPC
Function FpGetPid:pid_t; external name 'FPC_SYSC_GETPID';
Function FpReadLink(name,linkname:pchar;maxlen:size_t):cint; external name 'FPC_SYSC_READLINK';
Function FpNanoSleep(const req : timespec;rem : ptimespec) : longint; external name 'FPC_SYSC_NANOSLEEP';
function gettimeofday(tp: ptimeval;tzp:ptimezone):cint; external name 'FPC_SYSC_GETTIMEOFDAY';
function fpgettimeofday(tp: ptimeval;tzp:ptimezone):cint; external name 'FPC_SYSC_GETTIMEOFDAY';
{
$Log$
Revision 1.2 2003-09-14 20:15:01 marco
Revision 1.3 2003-09-15 20:29:50 marco
* small fix
Revision 1.2 2003/09/14 20:15:01 marco
* Unix reform stage two. Remove all calls from Unix that exist in Baseunix.
Revision 1.1 2002/12/18 16:43:26 marco