ada: Fix internal error on allocator involving interface type

ada: Fix internal error on allocator involving interface type

The problem is that an itype duplicated through Duplicate_Subexpr_No_Checks
ends up in a different scope than its source.  It is fixed by adding a new
formal parameter New_Scope to the function and forwarding it in the call to
the New_Copy_Tree function.

gcc/ada/ChangeLog:

	* exp_aggr.adb (Expand_Record_Aggregate): Use the named form for the
	second actual parameter in the call to Duplicate_Subexpr.
	* exp_attr.adb (Expand_Size_Attribute): Likewise.
	* exp_ch5.adb (Expand_Assign_Array): Likewise.
	(Expand_Assign_Array_Bitfield): Likewise.
	(Expand_Assign_Array_Bitfield_Fast): Likewise.
	* exp_util.ads (Duplicate_Subexpr): Add New_Scope formal parameter.
	(Duplicate_Subexpr_No_Checks): Likewise.
	(Duplicate_Subexpr_Move_Checks): Likewise.
	* exp_util.adb (Build_Allocate_Deallocate_Proc): Pass Proc_Id as the
	actual for New_Scope in the calls to Duplicate_Subexpr_No_Checks.
	(Duplicate_Subexpr): Add New_Scope formal parameter and forward it
	in the call to New_Copy_Tree.
	(Duplicate_Subexpr_No_Checks): Likewise.
	(Duplicate_Subexpr_Move_Checks): Likewise.