summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/io_invalid_1.f90
blob: 0dbcf631e4bc184a931ebcd28ab715583943843f (plain)
1
2
3
4
5
! { dg-do compile }
! PR fortran/20842
WRITE(UNIT=6,END=999) 0 ! { dg-error "END tag .* not allowed in output statement" }
999 CONTINUE
END