Browse Source

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

git-svn-id: trunk@29783 -
nickysn 10 years ago
parent
commit
850a321a23
1 changed files with 2 additions and 0 deletions
  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
   for I := 0 to GDB.ConsoleStream.Count - 1 do
     GDBOutputBuf.Append(PChar(GDB.ConsoleStream[I]));
     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;
   ProcessResponse;
   Dec(command_level);
   Dec(command_level);
   stop_breakpoint_number := prev_stop_breakpoint_number;
   stop_breakpoint_number := prev_stop_breakpoint_number;