浏览代码

* don't create RTTI for internally generated recorddefs (doing so can cause
undefined references to RTTI for some of the fields, and we don't need
it anyway because these types are not user-visible and we don't generate
variables of these types)

git-svn-id: trunk@30945 -

Jonas Maebe 10 年之前
父节点
当前提交
48ffe7b033
共有 1 个文件被更改,包括 2 次插入0 次删除
  1. 2 0
      compiler/symdef.pas

+ 2 - 0
compiler/symdef.pas

@@ -4077,6 +4077,8 @@ implementation
               current_module.globalsymtable.insert(ts);
               current_module.globalsymtable.insert(ts);
           end;
           end;
         symtablestack:=oldsymtablestack;
         symtablestack:=oldsymtablestack;
+        { don't create RTTI for internal types, these are not exported }
+        defstates:=defstates+[ds_rtti_table_written,ds_init_table_written];
       end;
       end;