Ver código fonte

pastojs: fixed impl rtti

git-svn-id: trunk@46817 -
Mattias Gaertner 4 anos atrás
pai
commit
aae5c452cb
1 arquivos alterados com 6 adições e 6 exclusões
  1. 6 6
      utils/pas2js/dist/rtl.js

+ 6 - 6
utils/pas2js/dist/rtl.js

@@ -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,