]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
fmt_t_7.f: Replace CR-LF with LF.
authorJerry DeLisle <jvdelisle@gcc.gnu.org>
Sun, 3 Aug 2008 22:02:22 +0000 (22:02 +0000)
committerJerry DeLisle <jvdelisle@gcc.gnu.org>
Sun, 3 Aug 2008 22:02:22 +0000 (22:02 +0000)
2008-08-03  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

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

From-SVN: r138568

gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/fmt_t_7.f

index e3d7628f70b7e813a5ab8c4431c461fc6baf869a..6819be9089d243a61608411441f450a7352bceb0 100644 (file)
@@ -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
index baef07ea7bdd9984a15e2d552df6f27dc794319a..718668ff40467e6c99784bc27712c5a2dc00521a 100644 (file)
@@ -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