Sign in
gnu
/
gcc
/
4aef14b09557ce072f1269bd8a05fa2b1df0eda2
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
pr96436_6.f90
blob: e413ffcbd0d7b6464745ebe665c8aff6a80edaf0 [
file
] [
log
] [
blame
]
!
{
dg
-
do
run
}
!
{
dg
-
options
"-std=f2003 -pedantic"
}
!
{
dg
-
shouldfail
"Zero width in format descriptor"
}
character
(
10
)
::
fmt
=
"(g0.2)"
print
fmt
,
0.3
end
!
{
dg
-
output
"Fortran runtime error: Zero width in format descriptor"
}