paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-20 13:39:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

FpDebug: Linux, fix reading proc/maps to get loaded libraries.

Browse Source 
(cherry picked from commit 6f1cd0c4b5)
This commit is contained in:
Martin 2025-01-07 12:54:05 +01:00
parent 3872ad8091
commit 772bc3236b
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/fpdebug/fpdbglinuxclasses.pas
View File

@ -1119,7 +1119,7 @@ begin
SetLength(Buf, TotalBytesRead + BlockLength); SetLength(Buf, TotalBytesRead + BlockLength);
BytesRead := FS.Read(Buf[TotalBytesRead+1], BlockLength); BytesRead := FS.Read(Buf[TotalBytesRead+1], BlockLength);
TotalBytesRead:=TotalBytesRead+BytesRead; TotalBytesRead:=TotalBytesRead+BytesRead;
until BytesRead <= BlockLength; until BytesRead <= 0;
SetLength(Buf, TotalBytesRead); SetLength(Buf, TotalBytesRead);
finally finally
FS.Free; FS.Free;