http://gcc.gnu.org/bugzilla/show_bug.cgi?id=57306
--- Comment #7 from janus at gcc dot gnu.org --- Here is a reduced version of the test case from http://gcc.gnu.org/ml/fortran/2013-07/msg00103.html, which for some reason still ICEs: type :: c end type c type(c), target :: x class(c), pointer :: px => x if (.not. associated(px)) call abort() end internal compiler error: in expand_expr_real_1, at expr.c:9361 end ^ 0x764cdd expand_expr_real_1(tree_node*, rtx_def*, machine_mode, expand_modifier, rtx_def**) /home/janus/gcc49/trunk/gcc/expr.c:9356 0x76b7b7 expand_expr /home/janus/gcc49/trunk/gcc/expr.h:444 0x76b7b7 expand_expr_addr_expr_1 /home/janus/gcc49/trunk/gcc/expr.c:7587 0x762a59 expand_expr_addr_expr /home/janus/gcc49/trunk/gcc/expr.c:7710 0x762a59 expand_expr_real_1(tree_node*, rtx_def*, machine_mode, expand_modifier, rtx_def**) /home/janus/gcc49/trunk/gcc/expr.c:10451 0xabcfca expand_expr /home/janus/gcc49/trunk/gcc/expr.h:444 0xabcfca output_constant /home/janus/gcc49/trunk/gcc/varasm.c:4665 0xabcfca output_constant(tree_node*, unsigned long, unsigned int) /home/janus/gcc49/trunk/gcc/varasm.c:4566 0xabdb4b output_constructor_regular_field /home/janus/gcc49/trunk/gcc/varasm.c:4912 0xabdb4b output_constructor /home/janus/gcc49/trunk/gcc/varasm.c:5191 0xac1981 assemble_variable(tree_node*, int, int, int) /home/janus/gcc49/trunk/gcc/varasm.c:2113 0xac2259 varpool_assemble_decl(varpool_node*) /home/janus/gcc49/trunk/gcc/varpool.c:347 0x6d9f12 output_in_order /home/janus/gcc49/trunk/gcc/cgraphunit.c:1788 0x6d9f12 compile() /home/janus/gcc49/trunk/gcc/cgraphunit.c:2024 0x6da184 finalize_compilation_unit() /home/janus/gcc49/trunk/gcc/cgraphunit.c:2106 0x82b04c write_global_declarations() /home/janus/gcc49/trunk/gcc/langhooks.c:322 0x5f82bf gfc_write_global_declarations /home/janus/gcc49/trunk/gcc/fortran/f95-lang.c:263