re PR fortran/35882 (Miscounted continuation lines when interspersed with data)

2008-04-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR fortran/35882
	* gfortran.dg/continuation_3.f90: Update test.
	* gfortran.dg/continuation_5.f: Update test.
	* gfortran.dg/continuation_10.f90: New test.

From-SVN: r134252

gcc/testsuite/ChangeLog

+2008-04-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+	PR fortran/35882
+	* gfortran.dg/continuation_3.f90: Update test.
+	* gfortran.dg/continuation_5.f: Update test.
+	* gfortran.dg/continuation_10.f90: New test.
+	
 2008-04-13  Thomas Koenig  <tkoenig@gcc.gnu.org>
 
 	PR libfortran/32972

gcc/testsuite/gfortran.dg/continuation_10.f90

+! { dg-do compile }
+! { dg-options -std=f95 }
+! PR35882 Miscounted continuation lines when interspersed with data
+program test_mod
+   implicit none
+
+   integer, dimension(50) :: array
+
+   array = 1
+
+   print "(a, i8)", &
+      "Line 1", &
+      array(2), &
+      "Line 3", &
+      array(4), &
+      "Line 5", &
+      array(6), &
+      "Line 7", &
+      array(8), &
+      "Line 9", &
+      array(10), &
+      "Line 11", &
+      array(12), &
+      "Line 13", &
+      array(14), &
+      "Line 15", &
+      array(16), &
+      "Line 17", &
+      array(18), &
+      "Line 19", &
+      array(20), &
+      "Line 21", &
+      array(22), &
+      "Line 23", &
+      array(24), &
+      "Line 25", &
+      array(26), &
+      "Line 27", &
+      array(28), &
+      "Line 29", &
+      array(30), &
+      "Line 31", &
+      array(32), &
+      "Line 33", &
+      array(34), &
+      "Line 35", &
+      array(36), &
+      "Line 37", &
+      array(38), &
+      "Line 39", &
+      array(40), & ! { dg-warning "Limit of 39 continuations exceeded" }
+      "Line 41", &
+      array(42), &
+      "Line 43"
+end program

gcc/testsuite/gfortran.dg/continuation_3.f90

 ! { dg-do compile }
-! { dg-options -pedantic }
+! { dg-options -std=f95 }
 ! PR 19262  Test limit on line continuations. Test case derived form case in PR
 ! by Steve Kargl.  Submitted by Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 print *, &

gcc/testsuite/gfortran.dg/continuation_5.f

 ! { dg-do compile }
-! { dg-options -pedantic }
+! { dg-options -std=f95 }
 ! PR 19262  Test limit on line continuations. Test case derived form case in PR
 ! by Steve Kargl.  Submitted by Jerry DeLisle  <jvdelisle@gcc.gnu.org>
        print *,