* replaced "is" test with faster field value test

git-svn-id: trunk@40156 -
This commit is contained in:
Jonas Maebe 2018-11-01 20:39:41 +00:00
parent 1a9eb77698
commit 011968e74b

View File

@ -4594,7 +4594,7 @@ implementation
((tloadnode(n).symtable.symtabletype = staticsymtable) and
(tloadnode(n).symtable = TSymtable(arg))) or
{ if the addr of the symbol is taken somewhere, it can be also non-local }
((tloadnode(n).symtableentry is tabstractvarsym) and
((tloadnode(n).symtableentry.typ in [localvarsym,paravarsym,staticvarsym]) and
(tabstractvarsym(tloadnode(n).symtableentry).addr_taken))
)
) or