diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2005-11-10 11:32:56 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2005-11-10 11:32:56 +0000 |
| commit | f45ddfe08e2caae7b24895e63e00a7884a2413d8 (patch) | |
| tree | 6ac8f371271e8b63e9cb7275c2b6d2d9b5a89159 /gcc/ada/trans.c | |
| parent | e82726f937a0c71adc3222d3b5dd14edbace81f9 (diff) | |
| download | gcc-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
Diffstat (limited to 'gcc/ada/trans.c')
| -rw-r--r-- | gcc/ada/trans.c | 3 |
1 files changed, 3 insertions, 0 deletions
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; } } |