|
@@ -423,6 +423,7 @@ implementation
|
|
|
result := tsym(vs.owner.Find('high'+vs.name));
|
|
|
end;
|
|
|
|
|
|
+
|
|
|
procedure check_hints(const srsym: tsym; const symoptions: tsymoptions; const deprecatedmsg : pshortstring);
|
|
|
begin
|
|
|
if not assigned(srsym) then
|
|
@@ -443,7 +444,6 @@ implementation
|
|
|
end;
|
|
|
|
|
|
|
|
|
-
|
|
|
{****************************************************************************
|
|
|
TSYM (base for all symtypes)
|
|
|
****************************************************************************}
|