[Bug fortran/41600] [OOP] SELECT TYPE with associate-name => exp: Arrays not supported

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41600

--- Comment #8 from Tobias Burnus <burnus at gcc dot gnu.org> 2012-01-29 
20:51:22 UTC ---
Author: burnus
Date: Sun Jan 29 20:51:19 2012
New Revision: 183682

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=183682
Log:
2012-01-29  Tobias Burnus  <bur...@net-b.de>

        PR fortran/41600
        * expr.c (gfc_default_initializer): Convert the values if
        the type does not match.

2012-01-29  Tobias Burnus  <bur...@net-b.de>

        PR fortran/41600
        * gfortran.dg/default_initialization_6.f90: New.


Added:
    trunk/gcc/testsuite/gfortran.dg/default_initialization_6.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/expr.c
    trunk/gcc/testsuite/ChangeLog