Sign in
gnu
/
gcc
/
4a0fed0c0c7241562eaa5f1a4c916b689429ad86
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
pr56007.f
blob: 644f28efe625423e8ab3c3dbc96bae58c7a70ea1 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR fortran
/
56007
!
Based
on testcase
by
Tobias
Schl
ΓΌ
ter
integer iw1
(
90
),
doiw1
(
90
)
do
iw1
(
1
)=
1
do
iw1
=
1
do
iw1
=
1
,
2
!
{
dg
-
error
"cannot be an array"
}
end
do
!
{
dg
-
error
"Expecting END PROGRAM statement"
}
END