re PR fortran/60751 (Extra comma in WRITE statement not diagnosed)

2016-06-12  Dominique d'Humieres  <dominiq@lps.ens.fr>

	PR target/60751
	* gfortran.dg/guality/pr41558.f90: Remove extra comma in WRITE
	statement.

From-SVN: r237332

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 0f17c46b3041a5961356d3795c57b8494b61786d..305af6b92f03c508ae84b00446472e5fa085f384 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2016-06-12  Dominique d'Humieres  <dominiq@lps.ens.fr>
+
+       PR target/60751
+       * gfortran.dg/guality/pr41558.f90: Remove extra comma in WRITE
+       statement.
+
 2016-06-11  Dominique d'Humieres  <dominiq@lps.ens.fr>
 
        PR target/60751

diff --git a/gcc/testsuite/gfortran.dg/guality/pr41558.f90 b/gcc/testsuite/gfortran.dg/guality/pr41558.f90
index 8a84de48a30699f9e3238116c522d5936fb7a421..840b2384012b180d4118e6da2dfe8c8351ab8b92 100644 (file)
--- a/gcc/testsuite/gfortran.dg/guality/pr41558.f90
+++ b/gcc/testsuite/gfortran.dg/guality/pr41558.f90
@@ -5,7 +5,7 @@
 
 subroutine f (s)
   character(len=3) :: s
-  write (*,*), s ! { dg-final { gdb-test 7 "s" "'foo'" } }
+  write (*,*) s ! { dg-final { gdb-test 7 "s" "'foo'" } }
 end
   call f ('foo')
 end