diff options
| author | aj <aj@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-12-04 13:25:32 +0000 |
|---|---|---|
| committer | aj <aj@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-12-04 13:25:32 +0000 |
| commit | cd8d7ab1ea0700933746fad7035fd76adb91c5a9 (patch) | |
| tree | 659454374f59121d42c372ee61596a39161d55ae /gcc | |
| parent | 9a0c59e912fa744add2f30f054c6268fe434b56d (diff) | |
| download | gcc-cd8d7ab1ea0700933746fad7035fd76adb91c5a9.tar.gz | |
* trans.c (tree_transform): Adjust call of expand_start_stmt_expr.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@47611 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 26 | ||||
| -rw-r--r-- | gcc/ada/trans.c | 4 |
2 files changed, 17 insertions, 13 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 86f1f301f6c..d2ac167bf07 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,17 +1,21 @@ +2001-12-04 Andreas Jaeger <aj@suse.de> + + * trans.c (tree_transform): Adjust call of expand_start_stmt_expr. + 2001-12-03 Robert Dewar <dewar@gnat.com> - * sinfo.ads: Minor reformatting. N_Freeze_Entity node does not + * sinfo.ads: Minor reformatting. N_Freeze_Entity node does not have Associated_Node. 2001-12-03 Robert Dewar <dewar@gnat.com> * prj-proc.adb: Minor reformatting - + * make.adb: Minor reformatting 2001-12-03 Geert Bosch <bosch@gnat.com> - * make.adb: Minor reformatting. + * make.adb: Minor reformatting. 2001-12-03 <dewar@gnat.com> @@ -19,15 +23,15 @@ 2001-12-03 Ed Schonberg <schonber@gnat.com> - * sem_ch12.adb (Inline_Instance_Body): Use Save_Scope_Stack and - push Standard on the stack before analyzing the instance body, + * sem_ch12.adb (Inline_Instance_Body): Use Save_Scope_Stack and + push Standard on the stack before analyzing the instance body, in order to have a clean visibility environment. - - * sem_ch12.adb (Inline_Instance_Body): Remove redundant code. + + * sem_ch12.adb (Inline_Instance_Body): Remove redundant code. 2001-12-03 Ed Schonberg <schonber@gnat.com> - * sem_ch12.adb (Instantiate_Package_Body): Protect against double + * sem_ch12.adb (Instantiate_Package_Body): Protect against double instantiation of a body that contains an inlined body. 2001-12-03 Ed Schonberg <schonber@gnat.com> @@ -62,8 +66,8 @@ 2001-11-29 Ed Schonberg <schonber@gnat.com> - * g-os_lib.adb (Add_To_Command): use explicit loop to move string - into Command, an array conversion is illegal here. Uncovered by + * g-os_lib.adb (Add_To_Command): use explicit loop to move string + into Command, an array conversion is illegal here. Uncovered by ACATS B460005. 2001/11/28 Geert Bosch <bosch@gnat.com> @@ -72,7 +76,7 @@ 2001-11-28 Doug Rupp <rupp@gnat.com> - * init.c: (__gnat_install_handler,VMS): Increase size of alternate + * init.c: (__gnat_install_handler,VMS): Increase size of alternate signal stack. 2001-11-28 Zack Weinberg <zack@codesourcery.com> diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c index 7db952eb4d9..2f3965f09e6 100644 --- a/gcc/ada/trans.c +++ b/gcc/ada/trans.c @@ -6,7 +6,7 @@ * * * C Implementation File * * * - * $Revision: 1.4 $ + * $Revision: 1.5 $ * * * Copyright (C) 1992-2001, Free Software Foundation, Inc. * * * @@ -1797,7 +1797,7 @@ tree_transform (gnat_node) we need to make sure it gets executed after the LHS. */ gnu_lhs = gnat_to_gnu (Left_Opnd (gnat_node)); clear_last_expr (); - gnu_rhs_side = expand_start_stmt_expr (); + gnu_rhs_side = expand_start_stmt_expr (1); gnu_rhs = gnat_to_gnu (Right_Opnd (gnat_node)); expand_end_stmt_expr (gnu_rhs_side); gnu_result_type = get_unpadded_type (Etype (gnat_node)); |