Browse Source

* handle properly debugger errors returned by an exec command in RunExecCommand

git-svn-id: trunk@30021 -
nickysn 10 years ago
parent
commit
3fe10bfd6c
1 changed files with 6 additions and 0 deletions
  1. 6 0
      ide/gdbmicon.pas

+ 6 - 0
ide/gdbmicon.pas

@@ -177,6 +177,12 @@ procedure TGDBController.RunExecCommand(const Cmd: string);
 begin
   UserScreen;
   Command(Cmd);
+  if not GDB.ResultRecord.Success then
+  begin
+    DebuggerScreen;
+    got_error := True;
+    exit;
+  end;
   WaitForProgramStop;
 end;