Explorar o código

* 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 %!s(int64=10) %!d(string=hai) anos
pai
achega
48ffe7b033
Modificáronse 1 ficheiros con 2 adicións e 0 borrados
  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;