diff options
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 1533af54eaa..40622e2e93f 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++) |