Sign in
gnu
/
gcc
/
fba228e259dd5112851527f2dbb62c5601100985
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
print_fmt_1.f90
blob: f7622b57d80ffdf2587980f3d6e8a5121f356309 [
file
] [
log
] [
blame
]
!
{
dg
-
do
run
}
!
PR
23661
!
PRINT
with
a character format was broken
character
(
5
)
::
f
=
"(a)"
!
{
dg
-
output
"check"
}
print
f
,
"check"
end
