[Bug fortran/50050] [4.6/4.7 Regression] Internal compiler error free_expr0 at expr.c:3709 via gfc_done_2

[mikael at gcc dot gnu.org]

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

--- Comment #12 from Mikael Morin <mikael at gcc dot gnu.org> 2011-08-26 22:17:13 UTC ---
Author: mikael
Date: Fri Aug 26 22:17:09 2011
New Revision: 178125

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=178125
Log:
2011-08-26  Mikael Morin  <mikael.morin@gcc.gnu.org>

    PR fortran/50050
    * expr.c (gfc_free_shape): Do nothing if shape is NULL.
    (free_expr0): Remove redundant NULL shape check.
    * resolve.c (check_host_association): Ditto.
    * trans-expr.c (gfc_trans_subarray_assign): Assert that shape is
    non-NULL.
    * trans-io.c (transfer_array_component): Ditto.

2011-08-26  Mikael Morin  <mikael.morin@gcc.gnu.org>

    PR fortran/50050
    * gfortran.dg/pointer_comp_init_1.f90: New test.


Added:
    branches/gcc-4_6-branch/gcc/testsuite/gfortran.dg/pointer_comp_init_1.f90
Modified:
    branches/gcc-4_6-branch/gcc/fortran/ChangeLog
    branches/gcc-4_6-branch/gcc/fortran/expr.c
    branches/gcc-4_6-branch/gcc/fortran/resolve.c
    branches/gcc-4_6-branch/gcc/fortran/trans-expr.c
    branches/gcc-4_6-branch/gcc/fortran/trans-io.c
    branches/gcc-4_6-branch/gcc/testsuite/ChangeLog