[Bug fortran/91651] New: ICE in gfc_trans_assignment_1, at fortran/trans-expr.c:11010

[gscfq@t-online.de]

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

            Bug ID: 91651
           Summary: ICE in gfc_trans_assignment_1, at
                    fortran/trans-expr.c:11010
           Product: gcc
           Version: 10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Affects versions down to at least gfortran-5.
Together with an argument KIND= (1,2,4,8,16) :


$ cat z1.f90
program p
   integer :: z(2)
   z = index('100101', '10', [.false.,.true.], kind=4)
   print *, z
end


$ gfortran-10-20190901 -c z1.f90
z1.f90:3:0:

    3 |    z = index('100101', '10', [.false.,.true.], kind=4)
      |
internal compiler error: in gfc_trans_assignment_1, at
fortran/trans-expr.c:11010
0x705774 gfc_trans_assignment_1
        ../../gcc/fortran/trans-expr.c:11009
0x6c4a0f trans_code
        ../../gcc/fortran/trans.c:1852
0x6ed7a4 gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6779
0x6775be translate_all_program_units
        ../../gcc/fortran/parse.c:6253
0x6775be gfc_parse_file()
        ../../gcc/fortran/parse.c:6492
0x6c14bf gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204