mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-23 09:19:40 +02:00
lazbuild: comment
git-svn-id: trunk@57375 -
This commit is contained in:
parent
96d15f563f
commit
b954691645
@ -583,6 +583,7 @@ procedure TExternalTool.SetThread(AValue: TExternalToolThread);
|
||||
var
|
||||
CallAutoFree: Boolean;
|
||||
begin
|
||||
// Note: in lazbuild ProcessStopped sets FThread:=nil, so SetThread is not called.
|
||||
EnterCriticalSection;
|
||||
try
|
||||
if FThread=AValue then Exit;
|
||||
@ -598,7 +599,6 @@ begin
|
||||
Application.QueueAsyncCall(@SyncAutoFree,0)
|
||||
else
|
||||
begin
|
||||
// Note: lazbuild has Application=nil and frees threads via the main thread
|
||||
debugln(['WARNING: (lazarus) TExternalTool.SetThread can not call AutoFree from other thread']);
|
||||
end;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user