diff options
| author | Geoffrey Keating <geoffk@apple.com> | 2004-08-05 05:52:01 +0000 |
|---|---|---|
| committer | Geoffrey Keating <geoffk@gcc.gnu.org> | 2004-08-05 05:52:01 +0000 |
| commit | 0e6df31e198fd8c0ab0daacc631de05365c2c216 (patch) | |
| tree | dd22110790902e6a0fb0065c11210552323ea19e /gcc/ada/utils.c | |
| parent | 99b1c586a59f235bb36457739f40ffe98fb18b66 (diff) | |
| download | gcc-0e6df31e198fd8c0ab0daacc631de05365c2c216.zip gcc-0e6df31e198fd8c0ab0daacc631de05365c2c216.tar.gz gcc-0e6df31e198fd8c0ab0daacc631de05365c2c216.tar.bz2 | |
re PR c/14516 (-fleading-underscore does not work correctly for file static variables)
2004-08-04 Geoffrey Keating <geoffk@apple.com>
PR 14516
* c-common.c (c_expand_decl): Don't special-case static VAR_DECLs.
* c-common.h (make_rtl_for_local_static): Delete.
* c-decl.c (shadow_tag_warned): Clean up comment.
(finish_decl): Clean up spacing. Use set_user_assembler_name when
appropriate. Don't pass asmspec to rest_of_decl_compilation.
* c-semantics.c (make_rtl_for_local_static): Delete.
* expr.c (init_block_move_fn): Use set_user_assembler_name.
(init_block_clear_fn): Likewise.
* passes.c (rest_of_decl_compilation): Remove asmspec parameter,
expect it to be in DECL_ASSEMBLER_NAME. Update callers in many files.
* toplev.h (rest_of_decl_compilation): Remove asmspec parameter.
* tree.h (make_decl_rtl): Remove second parameter.
(set_user_assembler_name): New.
* varasm.c (set_user_assembler_name): New.
(make_decl_rtl): Remove second parameter. Update callers in many
files.
Index: cp/ChangeLog
2004-08-04 Geoffrey Keating <geoffk@apple.com>
* decl.c (make_rtl_for_nonlocal_decl): Set DECL_ASSEMBLER_NAME rather
than passing it as a parameter to rest_of_decl_compilation.
* decl2.c (grokfield): Use set_user_assembler_name.
From-SVN: r85593
Diffstat (limited to 'gcc/ada/utils.c')
| -rw-r--r-- | gcc/ada/utils.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c index 2dc27d3..262c19f 100644 --- a/gcc/ada/utils.c +++ b/gcc/ada/utils.c @@ -1270,7 +1270,7 @@ create_type_decl (tree type_name, tree type, struct attrib *attr_list, else if (code != ENUMERAL_TYPE && code != RECORD_TYPE && !((code == POINTER_TYPE || code == REFERENCE_TYPE) && TYPE_IS_DUMMY_P (TREE_TYPE (type)))) - rest_of_decl_compilation (type_decl, NULL, global_bindings_p (), 0); + rest_of_decl_compilation (type_decl, global_bindings_p (), 0); if (!TYPE_IS_DUMMY_P (type)) gnat_pushdecl (type_decl, gnat_node); @@ -1354,7 +1354,7 @@ create_var_decl (tree var_name, tree asm_name, tree type, tree var_init, TREE_ADDRESSABLE (var_decl) = 1; if (TREE_CODE (var_decl) != CONST_DECL) - rest_of_decl_compilation (var_decl, 0, global_bindings_p (), 0); + rest_of_decl_compilation (var_decl, global_bindings_p (), 0); return var_decl; } @@ -1707,7 +1707,7 @@ create_subprog_decl (tree subprog_name, tree asm_name, gnat_pushdecl (subprog_decl, gnat_node); /* Output the assembler code and/or RTL for the declaration. */ - rest_of_decl_compilation (subprog_decl, 0, global_bindings_p (), 0); + rest_of_decl_compilation (subprog_decl, global_bindings_p (), 0); return subprog_decl; } @@ -2542,7 +2542,7 @@ update_pointer_to (tree old_type, tree new_type) if (TYPE_NAME (ptr1) && TREE_CODE (TYPE_NAME (ptr1)) == TYPE_DECL && TREE_CODE (new_type) != ENUMERAL_TYPE) - rest_of_decl_compilation (TYPE_NAME (ptr1), NULL, + rest_of_decl_compilation (TYPE_NAME (ptr1), global_bindings_p (), 0); } @@ -2555,7 +2555,7 @@ update_pointer_to (tree old_type, tree new_type) if (TYPE_NAME (ref1) && TREE_CODE (TYPE_NAME (ref1)) == TYPE_DECL && TREE_CODE (new_type) != ENUMERAL_TYPE) - rest_of_decl_compilation (TYPE_NAME (ref1), NULL, + rest_of_decl_compilation (TYPE_NAME (ref1), global_bindings_p (), 0); } } |