1 $DragonFly: src/gnu/usr.bin/cc34/cc1plus/patches/rtti.c.patch,v 1.1 2004/12/21 13:10:47 joerg Exp $
3 ===================================================================
4 RCS file: /home/joerg/wd/repository/dragonflybsd/src/contrib/gcc-3.4/gcc/cp/rtti.c,v
5 retrieving revision 1.1
7 --- rtti.c 20 Jun 2004 02:14:51 -0000 1.1
8 +++ rtti.c 20 Dec 2004 20:59:07 -0000
10 pushdecl_top_level_and_finish (d, NULL_TREE);
12 if (CLASS_TYPE_P (type))
13 - CLASSTYPE_TYPEINFO_VAR (TYPE_MAIN_VARIANT (type)) = d;
15 + CLASSTYPE_TYPEINFO_VAR (TYPE_MAIN_VARIANT (type)) = d;
16 + DECL_VISIBILITY (d) = CLASSTYPE_VISIBILITY (type);
17 + DECL_VISIBILITYSPECIFIED (d) = CLASSTYPE_VISIBILITYSPECIFIED (type);
20 /* Remember the type it is for. */
21 TREE_TYPE (name) = type;
23 TREE_STATIC (name_decl) = 1;
24 DECL_EXTERNAL (name_decl) = 0;
25 TREE_PUBLIC (name_decl) = 1;
26 + if (CLASS_TYPE_P (target))
28 + DECL_VISIBILITY (name_decl) = CLASSTYPE_VISIBILITY (target);
29 + DECL_VISIBILITYSPECIFIED (name_decl) = CLASSTYPE_VISIBILITYSPECIFIED (target);
31 import_export_tinfo (name_decl, target, typeinfo_in_lib_p (target));
32 /* External name of the string containing the type's name has a