OSDN Git Service

2008-02-21 Richard Guenther <rguenther@suse.de>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / io_invalid_1.f90
1 ! { dg-do compile }
2 ! PR fortran/20842
3 WRITE(UNIT=6,END=999) 0 ! { dg-error "END tag .* not allowed in output statement" }
4 999 CONTINUE
5 END