https://gcc.gnu.org/bugzilla/show_bug.cgi?id=96100

            Bug ID: 96100
           Summary: [9/10/11 Regression] ICE in gimplify_expr, at
                    gimplify.c:14638
           Product: gcc
           Version: 11.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gs...@t-online.de
  Target Milestone: ---

Changed between 20190310 and 20190331, r8 compiles it :


$ cat z1.f90
program p
   type t
      character(:), allocatable :: c(:)
   end type
   type(t) :: x
   associate (y => [x%c(1:1)])
   end associate
end


$ gfortran-8 -c z1.f90
$
$ gfortran-11-20200705 -c z1.f90
z1.f90:6:0:

    6 |    associate (y => [x%c(1:1)])
      |
internal compiler error: in gimplify_expr, at gimplify.c:14638
0x95f096 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:14638
0x9681f9 gimplify_modify_expr
        ../../gcc/gimplify.c:5779
0x95e923 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:13637
0x960a58 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6822
0x95e6f3 gimplify_statement_list
        ../../gcc/gimplify.c:1856
0x95e6f3 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:14081
0x960a58 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6822
0x95e50a gimplify_and_add(tree_node*, gimple**)
        ../../gcc/gimplify.c:486
0x95e50a gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:13988
0x960a58 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6822
0x9613c1 gimplify_bind_expr
        ../../gcc/gimplify.c:1411
0x95eb52 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:13838
0x960a58 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6822
0x95e6f3 gimplify_statement_list
        ../../gcc/gimplify.c:1856
0x95e6f3 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:14081
0x960a58 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6822
0x9613c1 gimplify_bind_expr
        ../../gcc/gimplify.c:1411
0x95eb52 gimplify_expr(tree_node**, gimple**, gimple**, bool (*)(tree_node*),
int)
        ../../gcc/gimplify.c:13838
0x960a58 gimplify_stmt(tree_node**, gimple**)
        ../../gcc/gimplify.c:6822
0x961e39 gimplify_body(tree_node*, bool)
        ../../gcc/gimplify.c:14873

Reply via email to