marco 22 år sedan
förälder
incheckning
25beeda7b5
2 ändrade filer med 11 tillägg och 5 borttagningar
  1. 6 3
      rtl/linux/ossysc.inc
  2. 5 2
      rtl/linux/ossysch.inc

+ 6 - 3
rtl/linux/ossysc.inc

@@ -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

+ 5 - 2
rtl/linux/ossysch.inc

@@ -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