DECL_EXTERNAL for weakref variables.
* c-family/c-pragma.c (handle_pragma_weak): Make sure aliases
are not declared as external.
* cgraph.c (cgraph_create_function_alias): Set weakref flag.
* cgraph.h (symtab_node_base): Add weakref flag.
* cgraphunit.c (cgraph_reset_node): Clear weakref flag.
(handle_alias_pairs): Set weakref flag, do not set DECL_EXTERNAL.
(output_weakrefs): Use weakref flag.
* fold-const.c (simple_operand_p): Handle WEAK.
* gimple-fold.c (can_refer_decl_in_current_unit_p): Drop weakref.
* ipa.c (varpool_externally_visible_p): Drop weakref.
(function_and_variable_visibility): Update comment; fix weakref
sanity checks; do not clear DECL_WEAK on them.
* lto-cgraph.c (lto_output_node): update.
(lto_output_varpool_node): Update.
(input_overwrite_node): Update.
(input_node): Update.
(input_varpool_node): Update.
* lto-symtab.c (lto_symtab_symbol_p): Do not special case weakrefs.
(lto_symtab_merge_symbols): Add sanity check.
(lto_symtab_prevailing_decl): Do not special case weakrefs.
* passes.c (rest_of_decl_compilation): Set static flag, too.
* symtab.c (dump_symtab_base): Dump weakref.
(verify_symtab_base): Sanity check weakrefs.
(symtab_make_decl_local): Remove duplicated code.
(symtab_alias_ultimate_target): Simplify.
* varpool.c (varpool_create_variable_alias): Set weakref flag.
* lto-partition.c (get_symbol_class): Simplify weakref handling.
(add_symbol_to_partition_1): Likewise.
(contained_in_symbol): Likewise.
(lto_balanced_map): Likewise.
(rename_statics): Drop weakref.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@199971
138bc75d-0d04-0410-961f-
82ee72b054a4
+2013-06-11 Jan Hubicka <jh@suse.cz>
+
+ * cgraph.c (cgraph_create_function_alias): Set weakref flag.
+ * cgraph.h (symtab_node_base): Add weakref flag.
+ * cgraphunit.c (cgraph_reset_node): Clear weakref flag.
+ (handle_alias_pairs): Set weakref flag, do not set DECL_EXTERNAL.
+ (output_weakrefs): Use weakref flag.
+ * fold-const.c (simple_operand_p): Handle WEAK.
+ * gimple-fold.c (can_refer_decl_in_current_unit_p): Drop weakref.
+ * ipa.c (varpool_externally_visible_p): Drop weakref.
+ (function_and_variable_visibility): Update comment; fix weakref
+ sanity checks; do not clear DECL_WEAK on them.
+ * lto-cgraph.c (lto_output_node): update.
+ (lto_output_varpool_node): Update.
+ (input_overwrite_node): Update.
+ (input_node): Update.
+ (input_varpool_node): Update.
+ * lto-symtab.c (lto_symtab_symbol_p): Do not special case weakrefs.
+ (lto_symtab_merge_symbols): Add sanity check.
+ (lto_symtab_prevailing_decl): Do not special case weakrefs.
+ * passes.c (rest_of_decl_compilation): Set static flag, too.
+ * symtab.c (dump_symtab_base): Dump weakref.
+ (verify_symtab_base): Sanity check weakrefs.
+ (symtab_make_decl_local): Remove duplicated code.
+ (symtab_alias_ultimate_target): Simplify.
+ * varpool.c (varpool_create_variable_alias): Set weakref flag.
+
2013-06-11 DJ Delorie <dj@redhat.com>
* config/rl78/rl78.c (TARGET_UNWIND_WORD_MODE): Define.
+2013-06-11 Jan Hubicka <jh@suse.cz>
+
+ * c-common.c (handle_alias_ifunc_attribute): Do not set
+ DECL_EXTERNAL for weakref variables.
+ * c-pragma.c (handle_pragma_weak): Make sure aliases
+ are not declared as external.
+
2013-06-07 Balaji V. Iyer <balaji.v.iyer@intel.com>
* array-notation-common.c (length_mismatch_in_expr_p): Moved this
if (TREE_CODE (decl) == FUNCTION_DECL)
DECL_INITIAL (decl) = error_mark_node;
else
- {
- if (lookup_attribute ("weakref", DECL_ATTRIBUTES (decl)))
- DECL_EXTERNAL (decl) = 1;
- else
- DECL_EXTERNAL (decl) = 0;
- TREE_STATIC (decl) = 1;
- }
+ TREE_STATIC (decl) = 1;
if (!is_alias)
/* ifuncs are also aliases, so set that attribute too. */
{
apply_pragma_weak (decl, value);
if (value)
- assemble_alias (decl, value);
+ {
+ DECL_EXTERNAL (decl) = 0;
+ if (TREE_CODE (decl) == VAR_DECL)
+ TREE_STATIC (decl) = 1;
+ assemble_alias (decl, value);
+ }
}
else
{
alias_node->symbol.alias_target = target;
alias_node->symbol.definition = true;
alias_node->symbol.alias = true;
+ if (lookup_attribute ("weakref", DECL_ATTRIBUTES (alias)) != NULL)
+ alias_node->symbol.weakref = true;
return alias_node;
}
/* True when symbol is an alias.
Set by assemble_alias. */
unsigned alias : 1;
+ /* True when alias is a weakref. */
+ unsigned weakref : 1;
/* C++ frontend produce same body aliases and extra name aliases for
virutal functions and vtables that are obviously equivalent.
Those aliases are bit special, especially because C++ frontend
node->symbol.analyzed = false;
node->symbol.definition = false;
node->symbol.alias = false;
+ node->symbol.weakref = false;
node->symbol.cpp_implicit_alias = false;
cgraph_node_remove_callees (node);
if (node)
{
node->symbol.alias_target = p->target;
+ node->symbol.weakref = true;
node->symbol.alias = true;
}
- DECL_EXTERNAL (p->decl) = 1;
alias_pairs->unordered_remove (i);
continue;
}
continue;
}
- /* Normally EXTERNAL flag is used to mark external inlines,
- however for aliases it seems to be allowed to use it w/o
- any meaning. See gcc.dg/attr-alias-3.c
- However for weakref we insist on EXTERNAL flag being set.
- See gcc.dg/attr-alias-5.c */
- if (DECL_EXTERNAL (p->decl))
- DECL_EXTERNAL (p->decl)
- = lookup_attribute ("weakref",
- DECL_ATTRIBUTES (p->decl)) != NULL;
-
if (DECL_EXTERNAL (target_node->symbol.decl)
/* We use local aliases for C++ thunks to force the tailcall
to bind locally. This is a hack - to keep it working do
{
symtab_node node;
FOR_EACH_SYMBOL (node)
- if (node->symbol.alias && DECL_EXTERNAL (node->symbol.decl)
+ if (node->symbol.alias
&& !TREE_ASM_WRITTEN (node->symbol.decl)
- && lookup_attribute ("weakref", DECL_ATTRIBUTES (node->symbol.decl)))
+ && node->symbol.weakref)
{
tree target;
then gcc_cv_as_weakref=yes
fi
elif test x$gcc_cv_as != x; then
- $as_echo ' .weakref foobar, barfnot' > conftest.s
+ $as_echo ' .weakref2 foobar, barfnot' > conftest.s
if { ac_try='$gcc_cv_as $gcc_cv_as_flags -o conftest.o conftest.s >&5'
{ { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_try\""; } >&5
(eval $ac_try) 2>&5
#pragma weak, etc). */
&& ! TREE_PUBLIC (exp)
&& ! DECL_EXTERNAL (exp)
+ /* Weakrefs are not safe to be read, since they can be NULL.
+ They are !TREE_PUBLIC && !DECL_EXTERNAL but still
+ have DECL_WEAK flag set. */
+ && (! VAR_OR_FUNCTION_DECL_P (exp) || ! DECL_WEAK (exp))
/* Loading a static variable is unduly expensive, but global
registers aren't expensive. */
&& (! TREE_STATIC (exp) || DECL_REGISTER (exp))));
if ((!TREE_STATIC (decl) && !DECL_EXTERNAL (decl))
|| (TREE_CODE (decl) != VAR_DECL && TREE_CODE (decl) != FUNCTION_DECL))
return true;
- /* Weakrefs have somewhat confusing DECL_EXTERNAL flag set; they
- are always safe. */
- if (DECL_EXTERNAL (decl)
- && lookup_attribute ("weakref", DECL_ATTRIBUTES (decl)))
- return true;
/* We are folding reference from external vtable. The vtable may reffer
to a symbol keyed to other compilation unit. The other compilation
unit may be in separate DSO and the symbol may be hidden. */
bool
varpool_externally_visible_p (struct varpool_node *vnode)
{
- /* Do not touch weakrefs; while they are not externally visible,
- dropping their DECL_EXTERNAL flags confuse most
- of code handling them. */
- if (vnode->symbol.alias && DECL_EXTERNAL (vnode->symbol.decl))
- return true;
-
if (DECL_EXTERNAL (vnode->symbol.decl))
return true;
happy. Clear the flag here to avoid confusion in middle-end. */
if (DECL_COMDAT (node->symbol.decl) && !TREE_PUBLIC (node->symbol.decl))
DECL_COMDAT (node->symbol.decl) = 0;
- /* For external decls stop tracking same_comdat_group, it doesn't matter
- what comdat group they are in when they won't be emitted in this TU,
- and simplifies later passes. */
+
+ /* For external decls stop tracking same_comdat_group. It doesn't matter
+ what comdat group they are in when they won't be emitted in this TU. */
if (node->symbol.same_comdat_group && DECL_EXTERNAL (node->symbol.decl))
{
#ifdef ENABLE_CHECKING
gcc_assert ((!DECL_WEAK (node->symbol.decl)
&& !DECL_COMDAT (node->symbol.decl))
|| TREE_PUBLIC (node->symbol.decl)
+ || node->symbol.weakref
|| DECL_EXTERNAL (node->symbol.decl));
if (cgraph_externally_visible_p (node, whole_program))
{
node->symbol.externally_visible = false;
node->symbol.forced_by_abi = false;
}
- if (!node->symbol.externally_visible && node->symbol.definition
+ if (!node->symbol.externally_visible
+ && node->symbol.definition && !node->symbol.weakref
&& !DECL_EXTERNAL (node->symbol.decl))
{
gcc_assert (whole_program || in_lto_p
{
/* weak flag makes no sense on local variables. */
gcc_assert (!DECL_WEAK (vnode->symbol.decl)
+ || vnode->symbol.weakref
|| TREE_PUBLIC (vnode->symbol.decl)
|| DECL_EXTERNAL (vnode->symbol.decl));
/* In several cases declarations can not be common:
vnode->symbol.externally_visible = false;
vnode->symbol.forced_by_abi = false;
}
- if (!vnode->symbol.externally_visible)
+ if (!vnode->symbol.externally_visible
+ && !vnode->symbol.weakref)
{
gcc_assert (in_lto_p || whole_program || !TREE_PUBLIC (vnode->symbol.decl));
symtab_make_decl_local (vnode->symbol.decl);
defined in other unit, we may use the info on aliases to resolve
symbol1 != symbol2 type tests that we can do only for locally defined objects
otherwise. */
- alias_p = node->symbol.alias && (!boundary_p || DECL_EXTERNAL (node->symbol.decl));
+ alias_p = node->symbol.alias && (!boundary_p || node->symbol.weakref);
bp_pack_value (&bp, alias_p, 1);
+ bp_pack_value (&bp, node->symbol.weakref, 1);
bp_pack_value (&bp, node->frequency, 2);
bp_pack_value (&bp, node->only_called_at_startup, 1);
bp_pack_value (&bp, node->only_called_at_exit, 1);
bp_pack_value (&bp, node->symbol.forced_by_abi, 1);
bp_pack_value (&bp, node->symbol.unique_name, 1);
bp_pack_value (&bp, node->symbol.definition, 1);
- alias_p = node->symbol.alias && (!boundary_p || DECL_EXTERNAL (node->symbol.decl));
+ alias_p = node->symbol.alias && (!boundary_p || node->symbol.weakref);
bp_pack_value (&bp, alias_p, 1);
+ bp_pack_value (&bp, node->symbol.weakref, 1);
bp_pack_value (&bp, node->symbol.analyzed && !boundary_p, 1);
gcc_assert (node->symbol.definition || !node->symbol.analyzed);
/* Constant pool initializers can be de-unified into individual ltrans units.
TREE_STATIC (node->symbol.decl) = 0;
}
node->symbol.alias = bp_unpack_value (bp, 1);
+ node->symbol.weakref = bp_unpack_value (bp, 1);
node->frequency = (enum node_frequency)bp_unpack_value (bp, 2);
node->only_called_at_startup = bp_unpack_value (bp, 1);
node->only_called_at_exit = bp_unpack_value (bp, 1);
node->thunk.virtual_value = virtual_value;
node->thunk.virtual_offset_p = (type & 4);
}
- if (node->symbol.alias && !node->symbol.analyzed
- && lookup_attribute ("weakref", DECL_ATTRIBUTES (node->symbol.decl)))
+ if (node->symbol.alias && !node->symbol.analyzed && node->symbol.weakref)
node->symbol.alias_target = get_alias_symbol (node->symbol.decl);
return node;
}
node->symbol.unique_name = bp_unpack_value (&bp, 1);
node->symbol.definition = bp_unpack_value (&bp, 1);
node->symbol.alias = bp_unpack_value (&bp, 1);
+ node->symbol.weakref = bp_unpack_value (&bp, 1);
node->symbol.analyzed = bp_unpack_value (&bp, 1);
node->symbol.used_from_other_partition = bp_unpack_value (&bp, 1);
node->symbol.in_other_partition = bp_unpack_value (&bp, 1);
DECL_EXTERNAL (node->symbol.decl) = 1;
TREE_STATIC (node->symbol.decl) = 0;
}
- if (node->symbol.alias && !node->symbol.analyzed
- && lookup_attribute ("weakref", DECL_ATTRIBUTES (node->symbol.decl)))
+ if (node->symbol.alias && !node->symbol.analyzed && node->symbol.weakref)
node->symbol.alias_target = get_alias_symbol (node->symbol.decl);
ref = streamer_read_hwi (ib);
/* Store a reference for now, and fix up later to be a pointer. */
{
if (!TREE_PUBLIC (e->symbol.decl) && !DECL_EXTERNAL (e->symbol.decl))
return false;
- /* weakrefs are really static variables that are made external by a hack. */
- if (lookup_attribute ("weakref", DECL_ATTRIBUTES (e->symbol.decl)))
- return false;
return symtab_real_symbol_p (e);
}
if (!node->symbol.analyzed && node->symbol.alias_target)
{
symtab_node tgt = symtab_node_for_asm (node->symbol.alias_target);
+ gcc_assert (node->symbol.weakref);
if (tgt)
symtab_resolve_alias (node, tgt);
}
if (TREE_CODE (decl) == FUNCTION_DECL && DECL_BUILT_IN (decl))
return decl;
- /* As an anoying special cases weakrefs are really static variables with
- EXTERNAL flag. */
- if (lookup_attribute ("weakref", DECL_ATTRIBUTES (decl)))
- return decl;
-
/* Ensure DECL_ASSEMBLER_NAME will not set assembler name. */
gcc_assert (DECL_ASSEMBLER_NAME_SET_P (decl));
+2013-06-11 Jan Hubicka <jh@suse.cz>
+
+ * lto-partition.c (get_symbol_class): Simplify weakref handling.
+ (add_symbol_to_partition_1): Likewise.
+ (contained_in_symbol): Likewise.
+ (lto_balanced_map): Likewise.
+ (rename_statics): Drop weakref.
+
2013-06-05 Richard Biener <rguenther@suse.de>
* lto.c (num_merged_types): New global variable.
return SYMBOL_DUPLICATE;
/* Weakref aliases are always duplicated. */
- if (lookup_attribute ("weakref", DECL_ATTRIBUTES (node->symbol.decl)))
+ if (node->symbol.weakref)
return SYMBOL_DUPLICATE;
/* External declarations are external. */
/* Add all aliases associated with the symbol. */
for (i = 0; ipa_ref_list_referring_iterate (&node->symbol.ref_list, i, ref); i++)
- if (ref->use == IPA_REF_ALIAS
- && !lookup_attribute ("weakref",
- DECL_ATTRIBUTES
- (ref->referring->symbol.decl)))
+ if (ref->use == IPA_REF_ALIAS && !node->symbol.weakref)
add_symbol_to_partition_1 (part, ref->referring);
/* Ensure that SAME_COMDAT_GROUP lists all allways added in a group. */
contained_in_symbol (symtab_node node)
{
/* Weakrefs are never contained in anything. */
- if (lookup_attribute ("weakref",
- DECL_ATTRIBUTES (node->symbol.decl)))
+ if (node->symbol.weakref)
return node;
if (cgraph_node *cnode = dyn_cast <cgraph_node> (node))
{
last_visited_node++;
- gcc_assert (node->symbol.definition
- || lookup_attribute ("weakref", DECL_ATTRIBUTES (node->symbol.decl)));
+ gcc_assert (node->symbol.definition || node->symbol.weakref);
/* Compute boundary cost of callgraph edges. */
for (edge = node->callees; edge; edge = edge->next_callee)
once this is fixed. */
|| DECL_EXTERNAL (node->symbol.decl)
|| !symtab_real_symbol_p (node))
- && !may_need_named_section_p (encoder, node)
- && !lookup_attribute ("weakref", DECL_ATTRIBUTES (node->symbol.decl)))
+ && !may_need_named_section_p (encoder, node))
return;
/* Now walk symbols sharing the same name and see if there are any conflicts.
/* Assign every symbol in the set that shares the same ASM name an unique
mangled name. */
for (s = symtab_node_for_asm (name); s;)
- if ((!s->symbol.externally_visible
- || lookup_attribute ("weakref", DECL_ATTRIBUTES (node->symbol.decl)))
+ if (!s->symbol.externally_visible
&& ((symtab_real_symbol_p (s)
- && (!DECL_EXTERNAL (node->symbol.decl)
- || lookup_attribute ("weakref", DECL_ATTRIBUTES (node->symbol.decl)))
+ && !DECL_EXTERNAL (node->symbol.decl)
&& !TREE_PUBLIC (node->symbol.decl))
|| may_need_named_section_p (encoder, s))
&& (!encoder
/* A quirk of the initial implementation of aliases required that the
user add "extern" to all of them. Which is silly, but now
historical. Do note that the symbol is in fact locally defined. */
- if (!lookup_attribute ("weakref", DECL_ATTRIBUTES (decl)))
- DECL_EXTERNAL (decl) = 0;
+ DECL_EXTERNAL (decl) = 0;
+ TREE_STATIC (decl) = 1;
assemble_alias (decl, alias);
}
}
fprintf (f, " analyzed");
if (node->symbol.alias)
fprintf (f, " alias");
+ if (node->symbol.weakref)
+ fprintf (f, " weakref");
if (node->symbol.cpp_implicit_alias)
fprintf (f, " cpp_implicit_alias");
if (node->symbol.alias_target)
error_found = true;
}
if (node->symbol.alias && !node->symbol.definition
- && !lookup_attribute ("weakref", DECL_ATTRIBUTES (node->symbol.decl)))
+ && !node->symbol.weakref)
{
error ("node is alias but not definition");
error_found = true;
}
+ if (node->symbol.weakref && !node->symbol.alias)
+ {
+ error ("node is weakref but not an alias");
+ error_found = true;
+ }
if (node->symbol.same_comdat_group)
{
symtab_node n = node->symbol.same_comdat_group;
DECL_VISIBILITY_SPECIFIED (decl) = 0;
DECL_VISIBILITY (decl) = VISIBILITY_DEFAULT;
TREE_PUBLIC (decl) = 0;
- DECL_VISIBILITY_SPECIFIED (decl) = 0;
- DECL_VISIBILITY (decl) = VISIBILITY_DEFAULT;
if (!DECL_RTL_SET_P (decl))
return;
if (availability)
{
- weakref_p = DECL_EXTERNAL (node->symbol.decl) && node->symbol.alias;
+ weakref_p = node->symbol.weakref;
if (!weakref_p)
*availability = symtab_node_availability (node);
else
enum availability a = symtab_node_availability (node);
if (a < *availability)
*availability = a;
- weakref_p = DECL_EXTERNAL (node->symbol.decl) && node->symbol.alias;
+ weakref_p = node->symbol.weakref;
}
}
if (availability)
alias_node->symbol.alias = true;
alias_node->symbol.definition = true;
alias_node->symbol.alias_target = decl;
+ if (lookup_attribute ("weakref", DECL_ATTRIBUTES (alias)) != NULL)
+ alias_node->symbol.weakref = true;
return alias_node;
}