mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-11 09:26:15 +02:00
* while searching for ancestor classes/interfaces after all USES unit
also search unit system. git-svn-id: trunk@15803 -
This commit is contained in:
parent
b63e82f815
commit
9883c06545
@ -1526,6 +1526,8 @@ begin
|
|||||||
break;
|
break;
|
||||||
ThisPackage := ThisPackage.NextSibling;
|
ThisPackage := ThisPackage.NextSibling;
|
||||||
end;
|
end;
|
||||||
|
if length(s)=0 then
|
||||||
|
s := ResolveLinkID('#rtl.System.' + Element.Name);
|
||||||
if Length(s) > 0 then
|
if Length(s) > 0 then
|
||||||
break;
|
break;
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user