From 48ffe7b033b7a5d6ff4c5280fb433b1c662cd653 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Sun, 31 May 2015 16:50:33 +0000
Subject: [PATCH]   * 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 -
---
 compiler/symdef.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/compiler/symdef.pas b/compiler/symdef.pas
index 45d0e81834..a18cb9274d 100644
--- a/compiler/symdef.pas
+++ b/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;