From: Eric Botcazou <ebotcazou@adacore.com>
Date: Mon, 22 Oct 2012 08:04:48 +0000 (+0000)
Subject: decl.c (gnat_to_gnu_entity): Do not generate the special PARM_DECL for an Out paramet... 
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=cd177257a5e620006d1902e6659832e9912a4e5a;p=gcc.git

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
---

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 93162909e49..30428c6ce32 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,8 @@
+2012-10-22  Eric Botcazou  <ebotcazou@adacore.com>
+
+	* 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.
+
 2012-10-22  Eric Botcazou  <ebotcazou@adacore.com>
 
 	PR bootstrap/54820
diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c
index 3935bb33e05..cb40ee68d50 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);