aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorDominique d'Humieres <dominiq@gcc.gnu.org>2016-06-11 21:21:22 +0200
committerDominique d'Humieres <dominiq@gcc.gnu.org>2016-06-11 21:21:22 +0200
commita0d66002539dcc75618868d902a44e11059b286a (patch)
tree5e276ebca0069b64c106407d140faaedbaaf1fa9 /gcc
parentd3dc025d96507c011a63edc328c8b8c898519e68 (diff)
downloadgcc-a0d66002539dcc75618868d902a44e11059b286a.zip
gcc-a0d66002539dcc75618868d902a44e11059b286a.tar.gz
gcc-a0d66002539dcc75618868d902a44e11059b286a.tar.bz2
re PR fortran/60751 (Extra comma in WRITE statement not diagnosed)
2016-06-11 Dominique d'Humieres <dominiq@lps.ens.fr> PR target/60751 * gfortran.dg/comma_IO_extension_1.f90: New test. * gfortran.dg/comma_IO_extension_2.f90: Likewise. From-SVN: r237330
Diffstat (limited to 'gcc')
-rw-r--r--gcc/testsuite/gfortran.dg/comma_IO_extension_1.f908
-rw-r--r--gcc/testsuite/gfortran.dg/comma_IO_extension_2.f909
2 files changed, 17 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/comma_IO_extension_1.f90 b/gcc/testsuite/gfortran.dg/comma_IO_extension_1.f90
new file mode 100644
index 0000000..abbb69d
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/comma_IO_extension_1.f90
@@ -0,0 +1,8 @@
+! { dg-do compile }
+! PR 60751
+! Contributed by Walter Spector <w6ws@earthlink.net>
+program extracomma
+ implicit none
+
+ write (*,*), 1, 2, 3 ! { dg-warning "Legacy Extension: Comma before i/o item list" }
+end program
diff --git a/gcc/testsuite/gfortran.dg/comma_IO_extension_2.f90 b/gcc/testsuite/gfortran.dg/comma_IO_extension_2.f90
new file mode 100644
index 0000000..5e80a17
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/comma_IO_extension_2.f90
@@ -0,0 +1,9 @@
+! { dg-do compile }
+! { dg-options "-std=legacy" }
+! PR 60751
+! Contributed by Walter Spector <w6ws@earthlink.net>
+program extracomma
+ implicit none
+
+ write (*,*), 1, 2, 3
+end program