Sign in
gnu
/
gcc
/
93ac832f1846e4867aa6537f76f510fab8e3e87d
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
array_constructor_29.f03
blob: 03534fa81ed7d3823db12a6ce4edffb016ce4d3c [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR fortran
/
36492
!
Similar
to the ICE
-
test
,
but now test it works
for
real constants
.
implicit
none
integer
,
parameter
::
a
=
42
type t
character
(
a
)
::
arr
(
1
)
=
[
"a"
]
end
type t
end