aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Botcazou <ebotcazou@adacore.com>2005-11-10 11:32:56 +0000
committerEric Botcazou <ebotcazou@gcc.gnu.org>2005-11-10 11:32:56 +0000
commitf45ddfe08e2caae7b24895e63e00a7884a2413d8 (patch)
tree6ac8f371271e8b63e9cb7275c2b6d2d9b5a89159
parente82726f937a0c71adc3222d3b5dd14edbace81f9 (diff)
downloadgcc-f45ddfe08e2caae7b24895e63e00a7884a2413d8.zip
gcc-f45ddfe08e2caae7b24895e63e00a7884a2413d8.tar.gz
gcc-f45ddfe08e2caae7b24895e63e00a7884a2413d8.tar.bz2
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
-rw-r--r--gcc/ada/ChangeLog5
-rw-r--r--gcc/ada/trans.c3
2 files changed, 8 insertions, 0 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 46ab2cc..dff3b6c 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 cd91a36..d685fb3 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;
}
}