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

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

           What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|ICE free_expr0, at          |ICE in free_expr0, at
                   |fortran/expr.c:445          |fortran/expr.c:445

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

Similar tests :


$ cat  z3.f90
program p
   type t
      integer :: a(3)
   end type
   type(t), parameter :: z = 1.0
   print *, z%a(1)
   print *, z%a
end


$ cat  z5.f90
program p
   type t
      real :: a(3)
   end type
   type(t), parameter :: z = '1'
   print *, z%a(1)
   print *, z%a
end


$ cat  z6.f90
program p
   type t
      real :: a(3)
   end type
   type(t), parameter :: z = .true.
   print *, z%a(1)
   print *, z%a
end

Reply via email to