r177104 - /trunk/gcc/ada/sem_ch3.adb

[charlet@gcc.gnu.org]

Author: charlet
Date: Tue Aug  2 09:23:40 2011
New Revision: 177104

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=177104
Log:
        * sem_ch3.adb (Analyze_Full_Type_Declaration): move test that a type
        has a discriminant specification so that it does not include the case
        of derived types
        (Derived_Type_Declaration): move here the test that a derived type has a
        discriminant specification

Modified:
    trunk/gcc/ada/sem_ch3.adb