Amir Avani wrote:
Thanks Michael, you are right! I want to know how should I use Criticalsections to make my program to print only one "here".
By not using them at all?
count := 0;
while true do
begin
if count = 0
WriteLn ('Here!');
count := 1;
end {while};
Critical sections don't make sense in a non-threading context.
Vinzent.
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel
