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

codetools: TBaseKeyWordFunctionList: fixed resorting

Browse Source 
git-svn-id: branches/fixes_1_8@57153 -
This commit is contained in:
mattias 2018-01-26 18:56:42 +00:00
parent 13ad825412
commit 11b3d3276d
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/codetools/keywordfunclists.pas
View File

@ -431,6 +431,7 @@ begin
for i:=0 to FCount-1 do begin
h:=KeyWordToHashIndex(FItems[i].KeyWord);
if h>=0 then inc(FBucketStart[h]);
FItems[i].IsLast:=false;
end;
// change hash-count-index to bucket-end-index
h:=0;