paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-31 04:42:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

FpDebugger (pure): Set current location after a step/next/step-out etc.

Browse Source 
git-svn-id: trunk@45281 -
This commit is contained in:
joost 2014-06-01 09:48:21 +00:00
parent 5d0bda950c
commit 96d22b6116
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
View File

@ -1094,7 +1094,11 @@ begin
SetState(dsPause);
continue:=true;
exit;
end;
end
else
// Debugger returned after a step/next/step-out etc..
ALocationAddr := GetLocation;
SetState(dsPause);
DoCurrent(ALocationAddr);
end;