[fpc-pascal] Lnet problem. In console mode, cannot have 2 listening socket

[Dennis Poon]

I use the console example lserver.pp in LNet and it works fine that way.
However, when I modified it to have 2 listening socket (TLTCP) listen 
one after another , and in the run loop,
   repeat
      socket1.CallAction;
     socket2.CallAction;
  until Quit1 or Quit2;
Only the first socket that listens runs normally,the socket than listen 
after the first, cannot accept client.

I am wondering this non-thread loop of LNet only supports 1 running 
server socket.

Any one has any idea?

Dennis
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal