Explorar o código

* fpnanosleep exported

peter %!s(int64=22) %!d(string=hai) anos
pai
achega
309742257d
Modificáronse 2 ficheiros con 10 adicións e 4 borrados
  1. 5 2
      rtl/unix/bunxh.inc
  2. 5 2
      rtl/unix/linuxold.inc

+ 5 - 2
rtl/unix/bunxh.inc

@@ -97,7 +97,7 @@ Type TGrpArr = Array [0..0] of TGid;            { C style array workarounds}
     Function  FPSigaction  (sig: cInt; act : pSigActionRec; oact : pSigActionRec): cint;
     Function  FPSelect     (N:cint;readfds,writefds,exceptfds:pfdSet;TimeOut:PTimeVal):cint;
     Function  FpIOCtl      (Handle:cint;Ndx: culong;Data: Pointer):cint;
-
+    Function  FpNanoSleep  (req : ptimespec;rem : ptimespec):cint;
 
     Function  FpGetEnv     (name : pChar): pChar;
     Function  FpGetEnv     (name : String): pChar;
@@ -122,7 +122,10 @@ Type TGrpArr = Array [0..0] of TGid;            { C style array workarounds}
 
 {
   $Log$
-  Revision 1.9  2003-09-27 12:51:33  peter
+  Revision 1.10  2003-09-27 13:49:41  peter
+    * fpnanosleep exported
+
+  Revision 1.9  2003/09/27 12:51:33  peter
     * fpISxxx macros renamed to C compliant fpS_ISxxx
 
   Revision 1.8  2003/09/20 12:38:29  marco

+ 5 - 2
rtl/unix/linuxold.inc

@@ -1003,7 +1003,7 @@ end;
 Function NanoSleep(const req : timespec;var rem : timespec) : longint;
 
 begin
- nanosleep:=fpnanosleep(req,@rem);
+ nanosleep:=fpnanosleep(@req,@rem);
 end;
 
 Function  OpenDir(f:pchar):pdir;
@@ -3131,7 +3131,10 @@ finalization
 end.
 {
   $Log$
-  Revision 1.6  2003-09-16 16:06:02  peter
+  Revision 1.7  2003-09-27 13:49:41  peter
+    * fpnanosleep exported
+
+  Revision 1.6  2003/09/16 16:06:02  peter
     * add typecasts for oldlinuxstat
 
   Revision 1.5  2003/09/16 15:40:31  marco