gdb com, ignored signal handler, state was not reset to running

This commit is contained in:
Basile Burg 2017-02-26 08:03:27 +01:00
parent bce4699819
commit b668c02f4a
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
1 changed files with 16 additions and 7 deletions

View File

@ -475,6 +475,7 @@ type
fLastLine: string; fLastLine: string;
fCommandProcessed: boolean; fCommandProcessed: boolean;
fDebugeeOptions: TCEDebugeeOptions; fDebugeeOptions: TCEDebugeeOptions;
procedure continueDebugging;
procedure waitCommandProcessed; procedure waitCommandProcessed;
procedure clearDisplays; procedure clearDisplays;
procedure updateMenu; procedure updateMenu;
@ -2175,7 +2176,10 @@ begin
signame := val.AsString; signame := val.AsString;
if (fOptions.ignoredSignals.Count <> 0) and if (fOptions.ignoredSignals.Count <> 0) and
(fOptions.ignoredSignals.IndexOf(signame) <> -1) then (fOptions.ignoredSignals.IndexOf(signame) <> -1) then
begin
continueDebugging;
exit; exit;
end;
if fJson.findAny('signal-meaning', val) then if fJson.findAny('signal-meaning', val) then
sigmean := val.AsString; sigmean := val.AsString;
if fJson.findObject('frame', obj) then if fJson.findObject('frame', obj) then
@ -2530,12 +2534,7 @@ begin
gdbCommand(cmd, @gdboutJsonize); gdbCommand(cmd, @gdboutJsonize);
end; end;
procedure TCEGdbWidget.btnStartClick(Sender: TObject); procedure TCEGdbWidget.continueDebugging;
begin
startDebugging;
end;
procedure TCEGdbWidget.btnContClick(Sender: TObject);
begin begin
gdbCommand('-exec-continue --all', @gdboutJsonize); gdbCommand('-exec-continue --all', @gdboutJsonize);
if assigned(fGdb) and fgdb.Running then if assigned(fGdb) and fgdb.Running then
@ -2545,6 +2544,16 @@ begin
end; end;
end; end;
procedure TCEGdbWidget.btnStartClick(Sender: TObject);
begin
startDebugging;
end;
procedure TCEGdbWidget.btnContClick(Sender: TObject);
begin
continueDebugging;
end;
procedure TCEGdbWidget.btnVariablesClick(Sender: TObject); procedure TCEGdbWidget.btnVariablesClick(Sender: TObject);
begin begin
infoVariables; infoVariables;