r173443 - in /branches/gcc-4_6-branch/gcc: ada/...

[ebotcazou@gcc.gnu.org]

Author: ebotcazou
Date: Thu May  5 16:27:03 2011
New Revision: 173443

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=173443
Log:
	PR ada/48844
	* gcc-interface/gigi.h (get_variant_part): Declare.
	* gcc-interface/decl.c (get_variant_part): Make global.
	* gcc-interface/utils2.c (find_common_type): Do not return T1 if the
	types have the same constant size, are record types and T1 has a
	variant part while T2 doesn't.

Added:
    branches/gcc-4_6-branch/gcc/testsuite/gnat.dg/discr29.adb
      - copied unchanged from r173442, trunk/gcc/testsuite/gnat.dg/discr29.adb
    branches/gcc-4_6-branch/gcc/testsuite/gnat.dg/discr29.ads
      - copied unchanged from r173442, trunk/gcc/testsuite/gnat.dg/discr29.ads
    branches/gcc-4_6-branch/gcc/testsuite/gnat.dg/discr30.adb
      - copied unchanged from r173442, trunk/gcc/testsuite/gnat.dg/discr30.adb
Modified:
    branches/gcc-4_6-branch/gcc/ada/ChangeLog
    branches/gcc-4_6-branch/gcc/ada/gcc-interface/decl.c
    branches/gcc-4_6-branch/gcc/ada/gcc-interface/gigi.h
    branches/gcc-4_6-branch/gcc/ada/gcc-interface/utils2.c
    branches/gcc-4_6-branch/gcc/testsuite/ChangeLog