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

Reply via email to