OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

sem_ch4.adb (Transform_Object_Operation): For an actual that is an overloaded function call... 

2005-07-04  Thomas Quinot  <quinot@adacore.com>

	* sem_ch4.adb (Transform_Object_Operation): For an actual that is an
	overloaded function call, carry interpretations from the original tree
	to the copy.

From-SVN: r101587
This commit is contained in:
Thomas Quinot 2005-07-04 15:29:36 +02:00 committed by Arnaud Charlet
parent d5f09c91bf
commit d3e65aad2c
1 changed files with 13 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
gcc/ada/sem_ch4.adb
View File

@ -4913,7 +4913,19 @@ package body Sem_Ch4 is
begin
Actual := First (Parameter_Associations (Parent_Node));
while Present (Actual) loop
Append (New_Copy_Tree (Actual), Actuals);
declare
New_Actual : constant Node_Id := New_Copy_Tree (Actual);
begin
Append (New_Actual, Actuals);
if Nkind (Actual) = N_Function_Call
and then Is_Overloaded (Name (Actual))
then
Save_Interps (Name (Actual), Name (New_Actual));
end if;
end;
Next (Actual);
end loop;
end;