diff options
| author | Neil Booth <neil@daikokuya.demon.co.uk> | 2002-04-04 09:48:44 +0200 |
|---|---|---|
| committer | Andreas Jaeger <aj@gcc.gnu.org> | 2002-04-04 09:48:44 +0200 |
| commit | 82a4b02502fe5c2d39b0095c4687198f90d61d71 (patch) | |
| tree | 8f1b4e3acd6a33142332878cb3092ce1a1b4906f /gcc/ada/utils.c | |
| parent | 4d8611d970fe2d72c384a0122f64c4451039bc1f (diff) | |
| download | gcc-82a4b02502fe5c2d39b0095c4687198f90d61d71.zip gcc-82a4b02502fe5c2d39b0095c4687198f90d61d71.tar.gz gcc-82a4b02502fe5c2d39b0095c4687198f90d61d71.tar.bz2 | |
utils.c (create_subprog_decl): Use SET_DECL_ASSEMBLER_NAME.
2002-04-04 Neil Booth <neil@daikokuya.demon.co.uk>
* utils.c (create_subprog_decl): Use SET_DECL_ASSEMBLER_NAME.
(builtin_function): Similarly.
From-SVN: r51843
Diffstat (limited to 'gcc/ada/utils.c')
| -rw-r--r-- | gcc/ada/utils.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c index 556e012..b346487 100644 --- a/gcc/ada/utils.c +++ b/gcc/ada/utils.c @@ -1756,7 +1756,7 @@ create_subprog_decl (subprog_name, asm_name, subprog_type, param_decl_list, DECL_RESULT (subprog_decl) = build_decl (RESULT_DECL, 0, return_type); if (asm_name != 0) - DECL_ASSEMBLER_NAME (subprog_decl) = asm_name; + SET_DECL_ASSEMBLER_NAME (subprog_decl, asm_name); process_attributes (subprog_decl, attr_list); @@ -1935,7 +1935,7 @@ builtin_function (name, type, function_code, class, library_name) DECL_EXTERNAL (decl) = 1; TREE_PUBLIC (decl) = 1; if (library_name) - DECL_ASSEMBLER_NAME (decl) = get_identifier (library_name); + SET_DECL_ASSEMBLER_NAME (decl, get_identifier (library_name)); pushdecl (decl); DECL_BUILT_IN_CLASS (decl) = class; |