OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fmt_l.f90: Fix end of line test pattern. 

2008-06-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	* gfortran.dg/fmt_l.f90: Fix end of line test pattern.

From-SVN: r136979
This commit is contained in:
Jerry DeLisle 2008-06-20 03:40:43 +00:00
parent 1ba4e523d1
commit 54e998b2f1
2 changed files with 20 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,7 @@
2008-06-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
* gfortran.dg/fmt_l.f90: Fix end of line test pattern.
2008-06-19 Andy Hutchinson <hutchinsonandy@aim.com>
* lib/target-supports.exp

32
gcc/testsuite/gfortran.dg/fmt_l.f90
View File

@ -52,34 +52,34 @@ program test_l
end program test_l
! { dg-output "At line 14 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 15 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 19 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 20 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 24 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 25 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 29 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 30 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 34 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 35 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 39 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 40 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 44 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 45 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 49 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }
! { dg-output "At line 50 of file.*" }
! { dg-output "Fortran runtime warning: Positive width required in format\n" }
! { dg-output "Fortran runtime warning: Positive width required in format(\n|\r\n|\r)" }