X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/8dbf997db86622966c80c12998c2b39577de949f..d2948bcc680fb1c36613c8535757fe0ed1faf10f:/lcorewsaasyncselect.pas?ds=sidebyside diff --git a/lcorewsaasyncselect.pas b/lcorewsaasyncselect.pas index de9d36f..712bd7f 100755 --- a/lcorewsaasyncselect.pas +++ b/lcorewsaasyncselect.pas @@ -138,12 +138,12 @@ begin end else begin if (event and (FD_READ or FD_ACCEPT)) <> 0 then readtrigger := true; if (event and (FD_WRITE)) <> 0 then writetrigger := true; - + if readtrigger or writetrigger then lasio.handlefdtrigger(readtrigger,writetrigger); end; - // don't reset the event manually for listen sockets to avoid unwanted - // extra onsessionavailible events - if (taddrint(findtree(@fdwatches,inttostr(fd))) and FD_ACCEPT) = 0 dowsaasyncselect(socket,0,0); // if not a listen socket reset watches + // don't reset the event manually for listen sockets to avoid unwanted + // extra onsessionavailible events + if (taddrint(findtree(@fdwatches,inttostr(socket))) and FD_ACCEPT) = 0 then dowsaasyncselect(socket,0,0); // if not a listen socket reset watches end; end else if (ahwnd=hwndlcore) and (aumsg=wm_dotasks) then begin //writeln('processing tasks');