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

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

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |accepts-invalid

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

Variants, if necessary at all :


program p
   character(3) :: %a = 'abc'
   print *, a
end


program p
   double precision :: %a = 1.0d0
   print *, a
end


program p
   integer :: %a = 1
   print *, a
end


program p
   logical :: %a = .true.
   print *, a
end


program p
   real :: %a = 1.0
   print *, a
end


program p
   type t
      integer :: n
   end type
   type(t) :: %a
   a = t(1)
   print *, a
end


program p
   type t
      integer :: n
   end type
   class(t), allocatable :: %a
   a = t(1)
   print *, a%n
end


program p
   complex :: %a = (0.0, 1.0)
   print *, a
end

Reply via email to