mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-09 13:56:06 +02:00
DebuggeR: Fix a range check, when clearing a condition
git-svn-id: trunk@27089 -
This commit is contained in:
parent
3feb97744b
commit
4525c8beda
@ -3957,7 +3957,7 @@ begin
|
||||
ValMode := #0;
|
||||
Value := 0;
|
||||
|
||||
P := @AExpression[1];
|
||||
P := PChar(AExpression);
|
||||
for n := 1 to Length(AExpression) do
|
||||
begin
|
||||
if InString
|
||||
|
Loading…
Reference in New Issue
Block a user