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 46ab2ccaf32338378b26d5f91ab53789898d1ea5..dff3b6cbcca64bbf86e5ab73ac1d8786a27efacf 100644 (file)
--- 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 cd91a368328fcbadb7ef792dd9ea8decea65cf64..d685fb34db0f0a42df35e2c4ece459daaf02d043 100644 (file)
--- 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;
            }
        }