From: Eric Botcazou <ebotcazou@adacore.com>
Date: Thu, 10 Nov 2005 11:32:56 +0000 (+0000)
Subject: re PR ada/23995 (ICE on misaligned rep clause)
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=f45ddfe08e2caae7b24895e63e00a7884a2413d8;p=gcc.git

re PR ada/23995 (ICE on misaligned rep clause)

	PR ada/23995
	* trans.c (call_to_gnu): Restore statement lost in translation.

From-SVN: r106731
---

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 46ab2ccaf32..dff3b6cbcca 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,8 @@
+2005-11-10  Eric Botcazou  <ebotcazou@adacore.com>
+
+	PR ada/23995
+	* trans.c (call_to_gnu): Restore statement lost in translation.
+
 2005-11-08  Eric Botcazou  <ebotcazou@adacore.com>
 
 	* init.c: Use the Linux-specific section for the IA-64/Linux target.
diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c
index cd91a368328..d685fb34db0 100644
--- a/gcc/ada/trans.c
+++ b/gcc/ada/trans.c
@@ -1687,6 +1687,9 @@ call_to_gnu (Node_Id gnat_node, tree *gnu_result_type_p, tree gnu_target)
 					  gnu_copy, gnu_actual);
 	      annotate_with_node (gnu_temp, gnat_actual);
 	      append_to_statement_list (gnu_temp, &gnu_after_list);
+
+	      /* Account for next statement just below.  */
+	      gnu_name = gnu_actual;
 	    }
 	}