aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authordominiq <dominiq@138bc75d-0d04-0410-961f-82ee72b054a4>2016-06-11 19:21:22 +0000
committerdominiq <dominiq@138bc75d-0d04-0410-961f-82ee72b054a4>2016-06-11 19:21:22 +0000
commit27e0ef1801bf932f5c60d4a864a2a919b6f1bc29 (patch)
tree5e276ebca0069b64c106407d140faaedbaaf1fa9
parent0cc8bc9804808da88f911e58b602c5eee9204bad (diff)
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. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@237330 138bc75d-0d04-0410-961f-82ee72b054a4
-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 00000000000..abbb69d66f6
--- /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 00000000000..5e80a174201
--- /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