r130673 - in /trunk/gcc: ada/ChangeLog ada/decl...

[hainque@gcc.gnu.org]

Author: hainque
Date: Fri Dec  7 10:50:23 2007
New Revision: 130673

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=130673
Log:
2007-12-07  Olivier Hainque  <hainque@adacore.com>

	PR ada/34173
	* decl.c (gnat_to_gnu_entity) <case E_Array_Type>: When setting
	the alignment on the GCC XUA array type, set TYPE_USER_ALIGN if
	this is from an alignment clause on the GNAT entity.
	* utils.c (create_field_decl): Rewrite the computation of DECL_ALIGN
	to distinguish the case where we set it from the type's alignment.
	When so, propagate TYPE_USER_ALIGN into DECL_USER_ALIGN to indicate
	whether this alignment was set from an explicit alignment clause.


Added:
    trunk/gcc/testsuite/gnat.dg/unc_memfree.adb
    trunk/gcc/testsuite/gnat.dg/unc_memops.adb
    trunk/gcc/testsuite/gnat.dg/unc_memops.ads
Modified:
    trunk/gcc/ada/ChangeLog
    trunk/gcc/ada/decl.c
    trunk/gcc/ada/utils.c
    trunk/gcc/testsuite/ChangeLog