mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-02-10 06:09:29 +08:00
Code Issues Packages Projects Releases Wiki Activity

trans.c (tree_transform): Adjust to recent change in expand_asm_operands to implement named asm operands.

Browse Source 
* trans.c (tree_transform): Adjust to recent change in
	expand_asm_operands to implement named asm operands.

From-SVN: r46289
This commit is contained in:
Florian Weimer 2001-10-16 21:12:53 +02:00 committed by Geert Bosch
parent 756b2d5ef5
commit f2436274a5
2 changed files with 14 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ada/ChangeLog
View File

@ -1,3 +1,8 @@
2001-10-16 Florian Weimer <fw@deneb.enyo.de>
* trans.c (tree_transform): Adjust to recent change in
expand_asm_operands to implement named asm operands.
2001-10-11 Ed Schonberg <schonber@gnat.com>
* exp_ch8.adb (Expand_N_Object_Renaming_Declaration): Bugfix in

15
gcc/ada/trans.c
View File

@ -6,7 +6,7 @@
* *
* C Implementation File *
* *
* $Revision: 1.2 $
* $Revision$
* *
* Copyright (C) 1992-2001, Free Software Foundation, Inc. *
* *
@ -3610,10 +3610,12 @@ tree_transform (gnat_node)
Setup_Asm_Inputs (gnat_node);
while (Present (gnat_temp = Asm_Input_Value ()))
{
gnu_input_list = tree_cons (gnat_to_gnu
(Asm_Input_Constraint ()),
gnat_to_gnu (gnat_temp),
gnu_input_list);
tree gnu_value = gnat_to_gnu (gnat_temp);
tree gnu_constr = build_tree_list (NULL_TREE, gnat_to_gnu
(Asm_Input_Constraint ()));
gnu_input_list
= tree_cons (gnu_constr, gnu_value, gnu_input_list);
Next_Asm_Input ();
}
@ -3621,7 +3623,8 @@ tree_transform (gnat_node)
while (Present (gnat_temp = Asm_Output_Variable ()))
{
tree gnu_value = gnat_to_gnu (gnat_temp);
tree gnu_constr = gnat_to_gnu (Asm_Output_Constraint ());
tree gnu_constr = build_tree_list (NULL_TREE, gnat_to_gnu
(Asm_Output_Constraint ()));
gnu_orig_out_list
= tree_cons (gnu_constr, gnu_value, gnu_orig_out_list);