[fpc-pascal] CodeTools reduce number of completions

[Mattias Gaertner]

On Thu, 2 Jul 2020 12:55:24 +0700
Ryan Joseph via fpc-pascal <fpc-pascal at lists.freepascal.org> wrote:

>[...]What would be more helpful is knowing which identifiers are
> from those large units and opting out of additional processing. Is
> that something which can be quickly known?

Maybe something like this:

List:=CodeToolBoss.IdentifierList;
for i:=0 to List.GetFilteredCountCnt-1 do
begin
  Item:=List.FilteredItems[i];
  if (Item.Tool<>nil) then begin
    if
    RightStr(Item.Tool.MainFilename,33)='packages/univint/src/MacOSAll.pas'
    then continue;

    if Item.Tool.Scanner.CleanedLen>1000000 then 
      continue;
  end;
end;

Mattias