paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 15:47:53 +02:00
Code Issues Packages Projects Releases Wiki Activity

Allow constructor RTTI info in Pas2Js generated file.

Browse Source
This commit is contained in:
Henrique Gottardi Werlang 2023-08-08 16:58:09 -03:00
parent 9392e62935
commit 8ecdc6ed05
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -21219,7 +21219,7 @@ begin
// check visibility
case mt of
mtClass:
if P.Visibility<>visPublished then continue;
if (P.Visibility<>visPublished) and (not P.InheritsFrom(TPasConstructor) or (P.Visibility <> visPublic)) then continue;
mtInterface: ; // all members of an interface are published
mtRecord:
// a published record publishes all non private members