diff options
author | Eric Botcazou <ebotcazou@adacore.com> | 2012-10-22 08:04:48 +0000 |
---|---|---|
committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2012-10-22 08:04:48 +0000 |
commit | cd177257a5e620006d1902e6659832e9912a4e5a (patch) | |
tree | acb471a5186508f47baf3b9c4216c82c1900b9d6 /gcc/ada/gcc-interface/decl.c | |
parent | 0b21f5d363e20cb13510ed63dc70ff7fbf7fb7b2 (diff) | |
download | gcc-cd177257a5e620006d1902e6659832e9912a4e5a.zip gcc-cd177257a5e620006d1902e6659832e9912a4e5a.tar.gz gcc-cd177257a5e620006d1902e6659832e9912a4e5a.tar.bz2 |
decl.c (gnat_to_gnu_entity): Do not generate the special PARM_DECL for an Out parameter in LTO mode.
* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Out_Parameter>: Do not
generate the special PARM_DECL for an Out parameter in LTO mode.
From-SVN: r192667
Diffstat (limited to 'gcc/ada/gcc-interface/decl.c')
-rw-r--r-- | gcc/ada/gcc-interface/decl.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index 3935bb3..cb40ee6 100644 --- a/gcc/ada/gcc-interface/decl.c +++ b/gcc/ada/gcc-interface/decl.c @@ -1503,7 +1503,11 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition) the VAR_DECL. Suppress debug info for the latter but make sure it will live on the stack so that it can be accessed from within the debugger through the PARM_DECL. */ - if (kind == E_Out_Parameter && definition && !optimize && debug_info_p) + if (kind == E_Out_Parameter + && definition + && debug_info_p + && !optimize + && !flag_generate_lto) { tree param = create_param_decl (gnu_entity_name, gnu_type, false); gnat_pushdecl (param, gnat_entity); |