Browse Source

Also reset ExecAsyncOutput at start of TGDBWrapper.ReadResponse

git-svn-id: trunk@29993 -
pierre 10 years ago
parent
commit
e92ce89c0b
1 changed files with 1 additions and 0 deletions
  1. 1 0
      ide/gdbmiwrap.pas

+ 1 - 0
ide/gdbmiwrap.pas

@@ -398,6 +398,7 @@ var
 begin
 begin
   FRawResponse.Clear;
   FRawResponse.Clear;
   FConsoleStream.Clear;
   FConsoleStream.Clear;
+  ExecAsyncOutput.Clear;
   for I := Low(NotifyAsyncOutput) to High(NotifyAsyncOutput) do
   for I := Low(NotifyAsyncOutput) to High(NotifyAsyncOutput) do
     FreeAndNil(NotifyAsyncOutput[I]);
     FreeAndNil(NotifyAsyncOutput[I]);
   SetLength(NotifyAsyncOutput, 0);
   SetLength(NotifyAsyncOutput, 0);