* gfortran.dg/io_invalid_1.f90: Fix expected error message.

From-SVN: r101602
This commit is contained in:
Francois-Xavier Coudert 2005-07-04 18:46:43 +02:00 committed by François-Xavier Coudert
parent 3bea4ad0e9
commit 0f8417e9b5
2 changed files with 5 additions and 1 deletions

View File

@ -1,3 +1,7 @@
2005-07-04 Francois-Xavier Coudert <coudert@clipper.ens.fr>
* gfortran.dg/io_invalid_1.f90: Fix expected error message.
2005-07-03 Andrew Pinski <pinskia@physics.uc.edu>
PR testsuite/22288

View File

@ -1,5 +1,5 @@
! { dg-do compile }
! PR fortran/20842
WRITE(UNIT=6,END=999) 0 ! { dg-error "END tag .* is not compatible with output" }
WRITE(UNIT=6,END=999) 0 ! { dg-error "END tag .* not allowed in output statement" }
999 CONTINUE
END