فهرست منبع

* 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);
           end;
         symtablestack:=oldsymtablestack;
+        { don't create RTTI for internal types, these are not exported }
+        defstates:=defstates+[ds_rtti_table_written,ds_init_table_written];
       end;