Sign in
gnu
/
gcc
/
1e819bd95ebeefc1dc469daa1855ce005cb77822
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
blocks_nested_incomplete_1.f90
blob: ccf6c3fa1ac80faf776008ac291c46b0d3b9b653 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
!
PR fortran
/
66175
!
Nested
incomplete blocks cause ICE
.
program main
block
block
end
program
!
{
dg
-
error
"Expecting END BLOCK statement"
}
!
{
dg
-
prune
-
output
"Unexpected end of file"
}