r125406 - /trunk/gcc/ada/exp_intr.adb

[charlet@gcc.gnu.org]

Author: charlet
Date: Wed Jun  6 10:27:12 2007
New Revision: 125406

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=125406
Log:
2007-04-20  Javier Miranda  <miranda@adacore.com>

	* exp_intr.adb (Expand_Unc_Deallocation): Add missing support for
	deallocation of class-wide interface objects.
	(Expand_Dispatching_Constructor_Call): Take into account that if the
	result of the dispatching constructor is an interface type, the
	function returns a class-wide interface type; otherwise the returned
	object would be actual. The frontend previously accepted returning
	interface types because Expand_Interface_Actuals silently performed
	the management of the returned type "as if" it were a class-wide
	interface type.
	(Expand_Dispatching_Constructor_Call): Replace call to
	Make_DT_Access_Action by direct call to Make_Function_Call.


Modified:
    trunk/gcc/ada/exp_intr.adb