mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-04-05 19:51:34 +08:00
Code Issues Packages Projects Releases Wiki Activity

re PR fortran/20460 (Nasty extensions that should always warn)

Browse Source 
PR fortran/20460
	* resolve.c (gfc_resolve_index): Make REAL array indices a
	GFC_STD_LEGACY feature.

From-SVN: r113672
This commit is contained in:
Francois-Xavier Coudert 2006-05-10 16:58:48 +02:00 committed by François-Xavier Coudert
parent 8e785b78e8
commit 7fdf6c6980
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -1,3 +1,9 @@
2006-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
PR fortran/20460
* resolve.c (gfc_resolve_index): Make REAL array indices a
GFC_STD_LEGACY feature.
2006-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
PR fortran/24549

2
gcc/fortran/resolve.c
View File

@ -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;