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

pas2js: nil typeinfo Module, Attr and params

Browse Source
This commit is contained in:
mattias 2021-09-21 12:21:42 +02:00
parent 3e760b33c7
commit 781da5e60d
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
utils/pas2js/dist/rtl.js vendored
View File

@ -1268,7 +1268,7 @@ var rtl = {
if (rtl.debug_rtti) rtl.debug('initRTTI');
// base types
rtl.tTypeInfo = { name: "tTypeInfo" };
rtl.tTypeInfo = { name: "tTypeInfo", kind: 0, $module: null, attr: null };
function newBaseTI(name,kind,ancestor){
if (!ancestor) ancestor = rtl.tTypeInfo;
if (rtl.debug_rtti) rtl.debug('initRTTI.newBaseTI "'+name+'" '+kind+' ("'+ancestor.name+'")');
@ -1311,7 +1311,7 @@ var rtl = {
newBaseTI("tTypeInfoRefToProcVar",17 /* tkRefToProcVar */,rtl.tTypeInfoProcVar);
// member kinds
rtl.tTypeMember = {};
rtl.tTypeMember = { attr: null };
function newMember(name,kind){
var m = Object.create(rtl.tTypeMember);
m.name = name;
@ -1320,7 +1320,8 @@ var rtl = {
};
newMember("tTypeMemberField",1); // tmkField
newMember("tTypeMemberMethod",2); // tmkMethod
newMember("tTypeMemberProperty",3); // tmkProperty
t = newMember("tTypeMemberProperty",3); // tmkProperty
t.params = null;
// base object for storing members: a simple object
rtl.tTypeMembers = {};