fmt_t_7.f: Replace CR-LF with LF.

2008-08-03  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	* gfortran.dg/fmt_t_7.f: Replace CR-LF with LF.

From-SVN: r138568

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index e3d7628..6819be9 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2008-08-03  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+       * gfortran.dg/fmt_t_7.f: Replace CR-LF with LF.
+
 2008-08-03  Uros Bizjak  <ubizjak@gmail.com>
 
        PR target/36992

diff --git a/gcc/testsuite/gfortran.dg/fmt_t_7.f b/gcc/testsuite/gfortran.dg/fmt_t_7.f
index baef07e..718668f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/fmt_t_7.f
+++ b/gcc/testsuite/gfortran.dg/fmt_t_7.f
@@ -1,16 +1,16 @@
-! { dg-do run { target fd_truncate } }\r
-! PR34974 null bytes when reverse-tabbing long records\r
-! Test case prpared by Jerry DeLisle <jvdelisle@gcc.gnu.org>\r
-       program test\r
-       character(1) :: a, b, c\r
-       write (10,'(t50000,a,t1,a)') 'b', 'a'\r
-       close (10)\r
-       open (10, access="stream")\r
-       read (10, pos=1) a\r
-       read (10, pos=50000) b\r
-       read (10, pos=25474) c\r
-       close (10, status="delete")\r
-       if (a /= "a") call abort\r
-       if (b /= "b") call abort\r
-       if (c /= " ") call abort\r
-       end\r
+! { dg-do run { target fd_truncate } }
+! PR34974 null bytes when reverse-tabbing long records
+! Test case prepared by Jerry DeLisle <jvdelisle@gcc.gnu.org>
+       program test
+       character(1) :: a, b, c
+       write (10,'(t50000,a,t1,a)') 'b', 'a'
+       close (10)
+       open (10, access="stream")
+       read (10, pos=1) a
+       read (10, pos=50000) b
+       read (10, pos=25474) c
+       close (10, status="delete")
+       if (a /= "a") call abort
+       if (b /= "b") call abort
+       if (c /= " ") call abort
+       end