Sign in
gnu
/
gcc
/
f450e21133974ec05fada3741eb91934f6371af4
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
widechar_10.f90
blob: 19f0ab33edbcaa84590df68491672ff14df86d86 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
{
dg
-
options
"-pedantic"
}
!
PR fortran
/
36534
CHARACTER
(
kind
=
4
,
len
=*)
MY_STRING4
(
1
:
3
)
PARAMETER
(
MY_STRING4
=
(
/ "A" , "B", "C" /
)
)
end