> On Jul 2, 2020, at 4:04 PM, Mattias Gaertner via fpc-pascal 
> <fpc-pascal@lists.freepascal.org> wrote:
> 
> 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;

Item.Tool.MainFilename is helpful to know, thanks.

Btw, since I have your attention, any idea about that FindReferences bug I 
reported some days? Still haven't figured it out yet.

Regards,
        Ryan Joseph

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Reply via email to