paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-24 07:19:34 +01:00
Code Issues Packages Projects Releases Wiki Activity

MWE:

Browse Source 
* Some minor debugger updates
  + Added evaluate to debugboss
  + Added hint debug evaluation

git-svn-id: trunk@3065 -
This commit is contained in:
lazarus 2002-08-18 08:57:26 +00:00
parent 415f03e812
commit 42d2da428a
1 changed files with 15 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
debugger/gdbmidebugger.pp
View File

@ -507,6 +507,15 @@ end;
function TGDBMIDebugger.GDBStop: Boolean; function TGDBMIDebugger.GDBStop: Boolean;
begin begin
if State = dsError
then begin
// We don't know the state of the debugger,
// force a reinit. Let's hope this works.
DebugProcess.Terminate(0);
Done;
Exit;
end;
if State = dsRun if State = dsRun
then GDBPause; then GDBPause;
@ -1137,6 +1146,12 @@ end;
end. end.
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.8 2002/11/05 22:41:13 lazarus
MWE:
* Some minor debugger updates
+ Added evaluate to debugboss
+ Added hint debug evaluation
Revision 1.7 2002/05/10 06:57:48 lazarus Revision 1.7 2002/05/10 06:57:48 lazarus
MG: updated licenses MG: updated licenses