------- Additional Comments From steven at gcc dot gnu dot org 2005-08-02
10:50 -------
This is just a complete mis-handling of vector subscripts. Even without
using the maxloc intrinsics this ICEs:
$ cat t.f90
program bug
integer, dimension(10) :: foo
write(*,*) foo((/1,3/))
end program
$ ./f951 -fdump-parse-tree t.f90
Namespace: A-H: (REAL 4) I-N: (INTEGER 4) O-Z: (REAL 4)
symtree: foo Ambig 0
symbol foo (INTEGER 4)(VARIABLE UNKNOWN-INTENT UNKNOWN-ACCESS
UNKNOWN-PROC DIMENSION)
Array spec:(1 AS_EXPLICIT 1 10 )
symtree: bug Ambig 0
symbol bug (UNKNOWN 0)(PROGRAM UNKNOWN-INTENT UNKNOWN-ACCESS
UNKNOWN-PROC)
WRITE UNIT=6 FMT=-1
TRANSFER foo((/ 1_8 , 3_8 /))
DT_END
MAIN__
t.f90:3: internal compiler error: in gfc_conv_ss_descriptor, at
fortran/trans-array.c:1264
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
$
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=21063
