Quellcode durchsuchen

+ log the error message from gdb/mi error result records to the gdb window

git-svn-id: trunk@29783 -
nickysn vor 10 Jahren
Ursprung
Commit
850a321a23
1 geänderte Dateien mit 2 neuen und 0 gelöschten Zeilen
  1. 2 0
      ide/gdbmiint.pas

+ 2 - 0
ide/gdbmiint.pas

@@ -282,6 +282,8 @@ begin
 
   for I := 0 to GDB.ConsoleStream.Count - 1 do
     GDBOutputBuf.Append(PChar(GDB.ConsoleStream[I]));
+  if (GDB.ResultRecord.AsyncClass='error') and Assigned(GDB.ResultRecord.Parameters['msg']) then
+    GDBErrorBuf.Append(PChar(GDB.ResultRecord.Parameters['msg'].AsString));
   ProcessResponse;
   Dec(command_level);
   stop_breakpoint_number := prev_stop_breakpoint_number;