r158056 - in /trunk/gcc: ada/ChangeLog ada/exp_...

[ebotcazou at gcc dot gnu dot org]

Author: ebotcazou
Date: Wed Apr  7 11:38:06 2010
New Revision: 158056

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=158056
Log:
	* exp_pakd.adb (Create_Packed_Array_Type): Always use a modular type
	if the size is small enough.  Propagate the alignment if there is an
	alignment clause on the original array type.
	* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Modular_Integer_Subtype>
	Deal with under-aligned packed array types.  Copy the size onto the
	justified modular type and don't lay it out again.  Likewise for the
	padding type built for other under-aligned subtypes.
	* gcc-interface/utils.c (finish_record_type): Do not set a default mode
	on the type.

Added:
    trunk/gcc/testsuite/gnat.dg/bit_packed_array1.adb
      - copied, changed from r157983, trunk/gcc/testsuite/gnat.dg/bit_packed_array.adb
    trunk/gcc/testsuite/gnat.dg/bit_packed_array1.ads
      - copied, changed from r157983, trunk/gcc/testsuite/gnat.dg/bit_packed_array.ads
    trunk/gcc/testsuite/gnat.dg/bit_packed_array4.adb
    trunk/gcc/testsuite/gnat.dg/bit_packed_array4.ads
Removed:
    trunk/gcc/testsuite/gnat.dg/bit_packed_array.adb
    trunk/gcc/testsuite/gnat.dg/bit_packed_array.ads
Modified:
    trunk/gcc/ada/ChangeLog
    trunk/gcc/ada/exp_pakd.adb
    trunk/gcc/ada/gcc-interface/decl.c
    trunk/gcc/ada/gcc-interface/utils.c
    trunk/gcc/testsuite/ChangeLog