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

Debugger: Stack.CountLimited, Ensure result is always set. Mentioned in issue

Browse Source 
(cherry picked from commit f63ba9cd3b)
This commit is contained in:
Martin 2022-09-06 16:59:35 +02:00
parent d8c23df73b
commit 289e8b9397
1 changed files with 1 additions and 1 deletions

2
debugger/debugger.pp
View File

@ -6383,9 +6383,9 @@ end;
function TIdeCallStack.CountLimited(ALimit: Integer): Integer;
begin
case HasAtLeastCount(ALimit) of
nbUnknown: Result := 0;
nbTrue: Result := ALimit;
nbFalse: Result := Count;
else Result := 0;
end;
end;