paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-08-20 09:39:02 +02:00
Code Issues Packages Projects Releases Wiki Activity

pastojs: fixed shortrefglobals for minimal class interface, issue 38042

Browse Source
This commit is contained in:
mattias 2020-11-07 12:10:24 +00:00
parent d497f63429
commit 0f2ec58bbe
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/packages/pastojs/src/fppas2js.pp
View File

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