[fpc-pascal] tthread.waitfor with timeout

[Jorge Aldo G. de F. Junior]

hi !

while working on my pascal actor model concurrency framework i hit a
problem with the way tthread is currently implemented.

i need to quit all actors (threads) before closing the main
application. this is done by waitfor/free each actor until none is
left in the pool of locally running actors.

but sometimes an actor hangs, and waitfor will literally waitfor forever...

is there a way to do the equivalent of waifor but with some kind of timeout ?

thanks in advance,

J. Aldo