diff options
| author | Dominique d'Humieres <dominiq@lps.ens.fr> | 2016-06-11 21:19:43 +0200 |
|---|---|---|
| committer | Dominique d'Humieres <dominiq@gcc.gnu.org> | 2016-06-11 21:19:43 +0200 |
| commit | d3dc025d96507c011a63edc328c8b8c898519e68 (patch) | |
| tree | 1ddf1a98390bd9c07eb148db1427ffcc7a49711d /gcc/fortran/io.c | |
| parent | aa18f65ad4bfdd9a566d7ebc3fd66075b29e35af (diff) | |
| download | gcc-d3dc025d96507c011a63edc328c8b8c898519e68.zip gcc-d3dc025d96507c011a63edc328c8b8c898519e68.tar.gz gcc-d3dc025d96507c011a63edc328c8b8c898519e68.tar.bz2 | |
re PR fortran/60751 (Extra comma in WRITE statement not diagnosed)
2016-06-11 Dominique d'Humieres <dominiq@lps.ens.fr>
PR fortran/60751
* io.c (gfc_resolve_dt): Replace GFC_STD_GNU with GFC_STD_LEGACY.
* gfortran.dg/comma_IO_extension_1.f90: New test.
* gfortran.dg/comma_IO_extension_2.f90: Likewise.
* gfortran.dg/array_constructor_49.f90: Remove extra comma in WRITE
statement.
* gfortran.dg/graphite/pr38083.f90: Likewise.
* gfortran.dg/integer_exponentiation_6.F90: Likewise and add
missing format.
--This line
M fortran/ChangeLog
M fortran/io.c
M testsuite/ChangeLog
M testsuite/gfortran.dg/array_constructor_49.f90
M testsuite/gfortran.dg/graphite/pr38083.f90
M testsuite/gfortran.dg/integer_exponentiation_6.F90
From-SVN: r237329
Diffstat (limited to 'gcc/fortran/io.c')
| -rw-r--r-- | gcc/fortran/io.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/io.c b/gcc/fortran/io.c index d538d84..7c648e9 100644 --- a/gcc/fortran/io.c +++ b/gcc/fortran/io.c @@ -3007,7 +3007,7 @@ gfc_resolve_dt (gfc_dt *dt, locus *loc) } if (dt->extra_comma - && !gfc_notify_std (GFC_STD_GNU, "Comma before i/o item list at %L", + && !gfc_notify_std (GFC_STD_LEGACY, "Comma before i/o item list at %L", &dt->extra_comma->where)) return false; |