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

SynEdit: Improve d8e4b249c3, initialize out variable. issue #41553

Browse Source 
(cherry picked from commit ebd7f56170)
This commit is contained in:
Martin 2025-04-01 13:38:27 +02:00
parent b20c594475
commit e893aa4eda
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
components/synedit/synedittextbuffer.pp
View File

@ -1147,9 +1147,10 @@ end;
function TSynEditStringList.GetPChar(ALineIndex: Integer; out ALen: Integer): PChar;
begin
ALen := 0;
if (ALineIndex = 0) and (Count = 0) then // simulate empty line
Result := nil
if (ALineIndex = 0) and (Count = 0) then begin // simulate empty line
ALen := 0;
Result := nil;
end
else
Result := FList.GetPChar(ALineIndex, ALen);
end;