paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-13 21:59:36 +02:00
Code Issues Packages Projects Releases Wiki Activity

FpDebug: Solved AV in StateMachineValid

Browse Source
This commit is contained in:
Joost van der Sluis 2022-05-13 20:27:54 +02:00
parent 90472ec714
commit 239b2be664
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/fpdebug/fpdbgdwarf.pas
View File

@ -5887,6 +5887,9 @@ begin
if FAddressInfo^.StateMachine = nil then Exit;
end;
Result := FAddressInfo <> nil;
if not result then exit;
// we cannot restore a statemachine to its current state
// so we shouldn't modify FAddressInfo^.StateMachine
// so use clones to navigate