https://gcc.gnu.org/bugzilla/show_bug.cgi?id=91588
G. Steinmetz <gs...@t-online.de> changed:
What |Removed |Added
----------------------------------------------------------------------------
Keywords| |ice-on-valid-code
--- Comment #1 from G. Steinmetz <gs...@t-online.de> ---
Catches this invalid variant :
$ cat z2.f90
program p
character(3) :: z = '123'
block
integer(len(z)) :: a
print *, kind(a)
end block
end
$ gfortran-10-20190825 -c z2.f90
z2.f90:4:20:
4 | integer(len(z)) :: a
| 1
Error: Kind 3 not supported for type INTEGER at (1)
