mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 04:29:17 +02:00
pastojs: fixed impl rtti
git-svn-id: trunk@46817 -
This commit is contained in:
parent
02c72dd5c4
commit
aae5c452cb
12
utils/pas2js/dist/rtl.js
vendored
12
utils/pas2js/dist/rtl.js
vendored
@ -109,20 +109,20 @@ var rtl = {
|
||||
rtl.error('module "'+module_name+'" is already registered');
|
||||
|
||||
var r = Object.create(rtl.tSectionRTTI);
|
||||
var module = pas[module_name] = {
|
||||
var module = r.$module = pas[module_name] = {
|
||||
$name: module_name,
|
||||
$intfuseslist: intfuseslist,
|
||||
$impluseslist: impluseslist,
|
||||
$state: rtl.m_loading,
|
||||
$intfcode: intfcode,
|
||||
$implcode: null,
|
||||
$impl: impluseslist?{
|
||||
$module: module,
|
||||
$rtti: r
|
||||
}:null,
|
||||
$impl: null,
|
||||
$rtti: r
|
||||
};
|
||||
module.$rtti.$module = module;
|
||||
if (impluseslist) module.$impl = {
|
||||
$module: module,
|
||||
$rtti: r
|
||||
};
|
||||
},
|
||||
|
||||
exitcode: 0,
|
||||
|
Loading…
Reference in New Issue
Block a user