forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

#97, fix pause and add brk not working before a first break

This commit is contained in:
Basile Burg 2016-12-01 02:53:41 +01:00
parent 3eebc99a7e
commit 8dc82b987f
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
1 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/ce_gdb.pas
View File

@ -1307,10 +1307,6 @@ begin
r := fGdbState = gsRunning; r := fGdbState = gsRunning;
if r then if r then
begin begin
// TODO-cGDB: follow state of https://sourceware.org/bugzilla/show_bug.cgi?id=18077
// "async mode" is not activated until a break is triggered.
// The action for the "pause" button is also affected.
// The problem exist still in GDB 7.12
fSilentPause := true; fSilentPause := true;
gdbCommand('-exec-interrupt --all', @gdboutJsonize); gdbCommand('-exec-interrupt --all', @gdboutJsonize);
waitCommandProcessed; waitCommandProcessed;
@ -1566,7 +1562,9 @@ begin
// launch // launch
cpuViewer.TIObject := fInspState; cpuViewer.TIObject := fInspState;
cpuViewer.RefreshPropertyValues; cpuViewer.RefreshPropertyValues;
gdbCommand('run >' + fOutputName + '< ' + fInputName); gdbCommand('set args >' + fOutputName + '< ' + fInputName);
// non-MI command "run" has the same problem as https://sourceware.org/bugzilla/show_bug.cgi?id=18077
gdbCommand('-exec-run');
setState(gsRunning); setState(gsRunning);
end; end;
{$ENDREGION} {$ENDREGION}