[Bug fortran/91862] [9/10 Regression] ICE in fold_convert_loc, at fold-const.c:2394

[gscfq@t-online.de]

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

G. Steinmetz <gscfq@t-online.de> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code

--- Comment #1 from G. Steinmetz <gscfq@t-online.de> ---

These variants actually compile and run :


$ cat z3.f90
program p
   integer :: i
   character(3) :: a(3) = 'abc'
   character(1) :: b(1)
   b = [([ (a(i)(i:i), i=1,1) ])]
   print *, b
end


$ cat z4.f90
program p
   integer :: i
   character(3) :: a(3) = 'abc'
   character(1) :: b(1)
   b = [([ (a(i)(1:1), i=1,1) ])]
   print *, b
end


$ cat z5.f90
program p
   integer :: i = 1
   character(3) :: a(3) = 'abc'
   character(1) :: b(1)
   b = [([ (a(i)(i:i)) ])]
   print *, b
end


$ gfortran-10-20190922 z3.f90 && ./a.out
 a
$