diff options
| author | Fritz Reese <fritzoreese@gmail.com> | 2017-05-18 10:24:37 +0000 |
|---|---|---|
| committer | Fritz Reese <foreese@gcc.gnu.org> | 2017-05-18 10:24:37 +0000 |
| commit | cf0042303ee3077097c3217a99d043a818c2721c (patch) | |
| tree | 92af5a7f8b884a40e7e67054bf797a7ce876c4a0 /gcc/fortran/io.c | |
| parent | 8268fc6022a375670b0208cf4d564f00f1c58794 (diff) | |
| download | gcc-cf0042303ee3077097c3217a99d043a818c2721c.zip gcc-cf0042303ee3077097c3217a99d043a818c2721c.tar.gz gcc-cf0042303ee3077097c3217a99d043a818c2721c.tar.bz2 | |
re PR fortran/79968 (diagnostics: merge similar diagnostics containing -fdec-structure)
2017-05-18 Fritz Reese <fritzoreese@gmail.com>
PR fortran/79968
gcc/fortran/ChangeLog:
PR fortran/79968
* decl.c (match_attr_spec, gfc_match_automatic,
gfc_match_static, gfc_match_structure_decl): Unify diagnostic
errors regarding -fdec options.
* io.c (match_dec_etag, match_dec_vtag, match_dec_ftag): Ditto.
From-SVN: r248188
Diffstat (limited to 'gcc/fortran/io.c')
| -rw-r--r-- | gcc/fortran/io.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/fortran/io.c b/gcc/fortran/io.c index 5f0e579..2c3d761 100644 --- a/gcc/fortran/io.c +++ b/gcc/fortran/io.c @@ -1515,8 +1515,8 @@ match_dec_etag (const io_tag *tag, gfc_expr **e) return m; else if (m != MATCH_NO) { - gfc_error ("%s is a DEC extension at %C, re-compile with " - "-fdec to enable", tag->name); + gfc_error ("%s at %C is a DEC extension, enable with " + "%<-fdec%>", tag->name); return MATCH_ERROR; } return m; @@ -1532,8 +1532,8 @@ match_dec_vtag (const io_tag *tag, gfc_expr **e) return m; else if (m != MATCH_NO) { - gfc_error ("%s is a DEC extension at %C, re-compile with " - "-fdec to enable", tag->name); + gfc_error ("%s at %C is a DEC extension, enable with " + "%<-fdec%>", tag->name); return MATCH_ERROR; } return m; @@ -1553,8 +1553,8 @@ match_dec_ftag (const io_tag *tag, gfc_open *o) if (!flag_dec) { - gfc_error ("%s is a DEC extension at %C, re-compile with " - "-fdec to enable", tag->name); + gfc_error ("%s at %C is a DEC extension, enable with " + "%<-fdec%>", tag->name); return MATCH_ERROR; } |