Funcion: FpNanoSleep()
Sintaxis:

function FpNanoSleep(
 
  req: ptimespec;
 
  rem: ptimespec
 
):cInt;

Descripcion: suspende el proceso hasta un periodo de tiempo especificado en req hasta que fue pasado. Entonces la funcion retorna. Si la llamada fue interrumpida (por alguna señal) entonces la funcion puede retornar anterior, y rem contendría el tiempo que resta hasta el final del periodo previsto. En este caso la funcion retornara -1, y LinuxError se definirá a EINTR

Si la funcion retorna sin errores, el valor retornado sera cero.

ERRORES
Si un error ocurre o la llamada fue interrumpida, retornara -1. Mas información puede ser obtenida usando fpGetErrno.

Vea También
FpPause
FpAlarm
Ejemplo:

program example72;
 
{ Program to demonstrate the NanoSleep function. }
 
uses BaseUnix;
 
Var
  Req,Rem : TimeSpec;
  Res : Longint;
 
begin
  With Req do
    begin
    tv_sec:=10;
    tv_nsec:=100;
    end;
  Write('NanoSleep returned : ');
  Flush(Output);
  Res:=(fpNanoSleep(@Req,@rem));
  Writeln(res);
  If (res<>0) then
    With rem do
      begin
      Writeln('Remaining seconds     : ',tv_sec);
      Writeln('Remaining nanoseconds : ',tv_nsec);
      end;
end.