mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 10:39:18 +02:00
FpDebug: Less debugln noise when checking if break exists
git-svn-id: trunk@61818 -
This commit is contained in:
parent
d9731de769
commit
addf952338
@ -705,7 +705,7 @@ end;
|
|||||||
function TBreakLocationMap.HasInsertedBreakInstructionAtLocation(
|
function TBreakLocationMap.HasInsertedBreakInstructionAtLocation(
|
||||||
const ALocation: TDBGPtr): Boolean;
|
const ALocation: TDBGPtr): Boolean;
|
||||||
begin
|
begin
|
||||||
Result := GetOrigValueAtLocation(ALocation) <> TDbgProcess.Int3;
|
Result := GetDataPtr(ALocation) <> nil;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TBreakLocationMap.GetEnumerator: TBreakLocationMapEnumerator;
|
function TBreakLocationMap.GetEnumerator: TBreakLocationMapEnumerator;
|
||||||
|
Loading…
Reference in New Issue
Block a user