mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-23 20:40:01 +02:00
Also reset ExecAsyncOutput at start of TGDBWrapper.ReadResponse
git-svn-id: trunk@29993 -
This commit is contained in:
parent
e4887f22b6
commit
e92ce89c0b
@ -398,6 +398,7 @@ var
|
||||
begin
|
||||
FRawResponse.Clear;
|
||||
FConsoleStream.Clear;
|
||||
ExecAsyncOutput.Clear;
|
||||
for I := Low(NotifyAsyncOutput) to High(NotifyAsyncOutput) do
|
||||
FreeAndNil(NotifyAsyncOutput[I]);
|
||||
SetLength(NotifyAsyncOutput, 0);
|
||||
|
Loading…
Reference in New Issue
Block a user