diff options
| author | Steven G. Kargl <kargl@gcc.gnu.org> | 2009-08-23 04:58:31 +0000 |
|---|---|---|
| committer | Steven G. Kargl <kargl@gcc.gnu.org> | 2009-08-23 04:58:31 +0000 |
| commit | 3212c187a8b479ab1d58f1d2a7c9ae90aceebf7d (patch) | |
| tree | 5a456b0d5d074d78f7733aebd6168adfd43ec6e9 /gcc/fortran/decl.c | |
| parent | 0aa580f4d2a80a27ee102dc7ae1d830836eb7edf (diff) | |
| download | gcc-3212c187a8b479ab1d58f1d2a7c9ae90aceebf7d.zip gcc-3212c187a8b479ab1d58f1d2a7c9ae90aceebf7d.tar.gz gcc-3212c187a8b479ab1d58f1d2a7c9ae90aceebf7d.tar.bz2 | |
proc_ptr_24.f90: New test.
2009-08-22 Steven G. Kargl <kargl@gcc.gnu.org>
* gfortran.dg/proc_ptr_24.f90: New test.
2009-08-22 Steven G. Kargl <kargl@gcc.gnu.org>
* fortran/decl.c: Disallow procedure pointers with -std=f95.
From-SVN: r151026
Diffstat (limited to 'gcc/fortran/decl.c')
| -rw-r--r-- | gcc/fortran/decl.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c index 1533af5..40622e2 100644 --- a/gcc/fortran/decl.c +++ b/gcc/fortran/decl.c @@ -4449,6 +4449,10 @@ match_ppc_decl (void) return MATCH_ERROR; } + if (gfc_notify_std (GFC_STD_F2003, "Fortran 2003: Procedure pointer " + "component at %C") == FAILURE) + return MATCH_ERROR; + /* Match PPC names. */ ts = current_ts; for(num=1;;num++) |