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

fixes #119 - debugee options updated at debug-time

This commit is contained in:
Basile Burg 2017-02-05 09:57:48 +01:00
parent 0fe7c885ef
commit f306a6a6bc
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/ce_gdb.pas
View File

@ -1358,7 +1358,8 @@ end;
procedure TCEGdbWidget.docFocused(document: TCESynMemo);
begin
fDoc := document;
updateDebugeeOptionsEditor;
if fGdbState = gsNone then
updateDebugeeOptionsEditor;
synchronizeBreakpointsFromDoc;
end;
@ -1371,7 +1372,8 @@ begin
if fDoc <> document then
exit;
fDoc := nil;
updateDebugeeOptionsEditor;
if fGdbState = gsNone then
updateDebugeeOptionsEditor;
end;
{$ENDREGION}
@ -1396,6 +1398,7 @@ begin
if fGdb.Running then
fGdb.Terminate(0);
FreeAndNil(fGdb);
updateDebugeeOptionsEditor;
end;
procedure TCEGdbWidget.storeObserversBreakpoints;
@ -2184,6 +2187,7 @@ begin
setState(gsNone);
subjDebugStop(fSubj);
deleteRedirectedIO;
updateDebugeeOptionsEditor;
end;
end;
@ -2539,6 +2543,7 @@ begin
subjDebugStop(fSubj);
setState(gsNone);
deleteRedirectedIO;
updateDebugeeOptionsEditor;
end;
procedure TCEGdbWidget.btnWatchClick(Sender: TObject);