/[lcore]/trunk/lcoreselect.pas
ViewVC logotype

Diff of /trunk/lcoreselect.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 156 by beware, Fri Mar 28 03:18:52 2014 UTC revision 157 by beware, Fri Aug 13 03:52:55 2021 UTC
# Line 69  Line 69 
69    temptimer               : tltimer  ;    temptimer               : tltimer  ;
70    
71  begin  begin
72    gettimeofday(tvnow);    gettimemonotonic(tvnow);
73    currenttimer := firsttimer;    currenttimer := firsttimer;
74    while assigned(currenttimer) do begin    while assigned(currenttimer) do begin
75      //writeln(currenttimer.enabled);      //writeln(currenttimer.enabled);
# Line 249  Line 249 
249      fd_zero(FDSW);      fd_zero(FDSW);
250      if result=-1 then begin      if result=-1 then begin
251        if linuxerror = SYS_EINTR then begin        if linuxerror = SYS_EINTR then begin
252          // we received a signal it's not a problem          // we received a signal it is not a problem
253        end else begin        end else begin
254          raise esocketexception.create('select returned error '+inttostr(linuxerror));          raise esocketexception.create('select returned error '+inttostr(linuxerror));
255        end;        end;
# Line 309  Line 309 
309        selectresult := doselect(nil);        selectresult := doselect(nil);
310    
311      end else begin      end else begin
312        gettimeofday(tvnow);        gettimemonotonic(tvnow);
313        tv_subtract(tv,tvnow);        tv_subtract(tv,tvnow);
314    
315        //writeln('timers active');        //writeln('timers active');

Legend:
Removed from v.156  
changed lines
  Added in v.157

No admin address has been configured">No admin address has been configured
ViewVC Help
Powered by ViewVC 1.1.26