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)

Reply via email to