pastojs: fixed shortrefglobals for minimal class interface, issue 38042

This commit is contained in:
mattias 2020-11-07 12:10:24 +00:00
parent d497f63429
commit 0f2ec58bbe

View File

@ -15388,7 +15388,7 @@ begin
RaiseNotSupported(El,AContext,20180405093512);
end;
NeedInitFunction:=(pcsfPublished in Scope.Flags) or HasTypeInfo(El,AContext)
or (IntfKind<>'');
or (IntfKind<>'') or (coShortRefGlobals in Options);
end;
if NeedInitFunction then