mirror of
https://github.com/autc04/Retro68.git
synced 2024-06-28 11:30:19 +00:00
12 lines
234 B
Fortran
12 lines
234 B
Fortran
! { dg-do compile }
|
|
! { dg-options "-std=f2003" }
|
|
|
|
! PR fortran/36492
|
|
! Check that it works with a typespec even for not-the-same-length elements.
|
|
|
|
type t
|
|
character (1) :: arr (2) = [ character(len=2) :: "a", "ab" ]
|
|
end type t
|
|
|
|
end
|