paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 07:49:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

Debugger: assembler, fix rangecheck or wrong behaviour if debugger is nil

Browse Source
This commit is contained in:
Martin 2024-03-15 22:16:54 +01:00
parent ec9335ef59
commit 073f3095cf
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/packages/idedebugger/assemblerdlg.pp
View File

@ -949,7 +949,7 @@ begin
actCurrentInstr.Enabled := HasDisassembler and (FLocation <> 0);
actGotoAddr.Enabled := HasDisassembler and (StrToQWordDef(EditGotoAddr.Text, 0) <> 0);
actCopy.Enabled := HasDisassembler;
popCopyAddr.Enabled := GetLinMapEntryForLine(FSelectLine, dummy);
popCopyAddr.Enabled := HasDisassembler and GetLinMapEntryForLine(FSelectLine, dummy);
actStepOverInstr.Enabled := HasDisassembler;
actStepIntoInstr.Enabled := HasDisassembler;
end;