diff options
| author | Janus Weil <janus@gcc.gnu.org> | 2013-04-04 21:21:01 +0200 |
|---|---|---|
| committer | Janus Weil <janus@gcc.gnu.org> | 2013-04-04 21:21:01 +0200 |
| commit | fbdeeaac539d9cf635a5d6bf622d166f77e762d5 (patch) | |
| tree | 0c9fb7f88c1f82b655859b318a75484cc385cb3f /gcc/fortran/match.c | |
| parent | 3465257612a4b23668d6e6c22404024a5885da0b (diff) | |
| download | gcc-fbdeeaac539d9cf635a5d6bf622d166f77e762d5.zip gcc-fbdeeaac539d9cf635a5d6bf622d166f77e762d5.tar.gz gcc-fbdeeaac539d9cf635a5d6bf622d166f77e762d5.tar.bz2 | |
re PR fortran/40881 ([F03] warn for obsolescent features)
2013-04-04 Janus Weil <janus@gcc.gnu.org>
PR fortran/40881
* match.c (gfc_match_return): Remove standard notification.
* primary.c (gfc_match_actual_arglist): Add standard notification.
2013-04-04 Janus Weil <janus@gcc.gnu.org>
PR fortran/40881
* gfortran.dg/altreturn_1.f90: Add -std=gnu.
* gfortran.dg/altreturn_4.f90: Ditto.
* gfortran.dg/altreturn_3.f90: Replace -std=legacy by -std=gnu.
* gfortran.dg/altreturn_5.f90: Ditto.
* gfortran.dg/altreturn_6.f90: Ditto.
* gfortran.dg/altreturn_7.f90: Ditto.
From-SVN: r197495
Diffstat (limited to 'gcc/fortran/match.c')
| -rw-r--r-- | gcc/fortran/match.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/gcc/fortran/match.c b/gcc/fortran/match.c index d75cf1c..be8740c 100644 --- a/gcc/fortran/match.c +++ b/gcc/fortran/match.c @@ -4040,10 +4040,6 @@ gfc_match_return (void) goto cleanup; } - if (gfc_notify_std (GFC_STD_F95_OBS, "Alternate RETURN " - "at %C") == FAILURE) - return MATCH_ERROR; - if (gfc_current_form == FORM_FREE) { /* The following are valid, so we can't require a blank after the |