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

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

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

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

Works without that parameter attribute, and also old fashioned :


$ cat z3.f90
module m
   type t
      character(3) :: c
   end type
   type(t), parameter :: x = t('abc')
end
program p
   use m
   call s(len(x%c))
contains
   subroutine s(n)
      print *, n
   end
end


$ gfortran-10-20191201 z3.f90 && ./a.out
           3

Reply via email to