paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 08:48:08 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Increased the bounds of TBooleanArray to prevent a range check error while linking Lazarus.

Browse Source
This commit is contained in:
Yuriy Sydorov 2021-12-12 15:50:12 +02:00
parent 487721dea8
commit 59fca3a01d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/link.pas
View File

@ -98,7 +98,7 @@ interface
function PostProcessMachExecutable(const fn: string; isdll: boolean): boolean;
end;
TBooleanArray = array [1..1024] of boolean;
TBooleanArray = array [1..100000] of boolean;
PBooleanArray = ^TBooleanArray;
TInternalLinker = class(TLinker)