Sign in
gnu
/
gcc
/
1e819bd95ebeefc1dc469daa1855ce005cb77822
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
maxerrors.f90
blob: 6c3232d2f3258f24b0e2e7fd0c55113f9176ad68 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
{
dg
-
options
"-fmax-errors=1"
}
!
PR66528
!
{
dg
-
prune
-
output
"compilation terminated"
}
program main
read
(*,*)
n
if
(
n
<
0
)
then
print
*,
foo
end
!
{
dg
-
error
"END IF statement expected"
}
print
*,
bar
end
program main