diff options
Diffstat (limited to 'gcc/fortran/resolve.c')
| -rw-r--r-- | gcc/fortran/resolve.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 1e57adda605..26d4e769600 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -2170,7 +2170,7 @@ gfc_resolve_index (gfc_expr * index, int check_scalar) } if (index->ts.type == BT_REAL) - if (gfc_notify_std (GFC_STD_GNU, "Extension: REAL array index at %L", + if (gfc_notify_std (GFC_STD_LEGACY, "Extension: REAL array index at %L", &index->where) == FAILURE) return FAILURE; |