[EMAIL PROTECTED] CompTest]$ cat isotope.f90
program fred
implicit none
integer,dimension(3),parameter::MaxJ=2
integer,dimension(maxval(MaxJ))::N
integer::J
N=0
do J=1,maxval(MaxJ)
write(*,*)N(J)
enddo
end
[EMAIL PROTECTED] CompTest]$ gfortran -v -c isotope.f90
Using built-in specs.
Target: x86_64-unknown-linux-gnu
Configured with: ./configure --disable-multilib --enable-languages=c,fortran
Thread model: posix
gcc version 4.2.2
/usr/local/libexec/gcc/x86_64-unknown-linux-gnu/4.2.2/f951 isotope.f90 -quiet
-dumpbase isotope.f90 -mtune=generic -auxbase isotope -version -I
/usr/local/lib/gcc/x86_64-unknown-linux-gnu/4.2.2/finclude -o /tmp/ccS94960.s
GNU F95 version 4.2.2 (x86_64-unknown-linux-gnu)
compiled by GNU C version 4.2.2.
GGC heuristics: --param ggc-min-expand=100 --param ggc-min-heapsize=131072
isotope.f90: In function MAIN__:
isotope.f90:4: internal compiler error: in gfc_conv_intrinsic_minmaxval, at
fortran/trans-intrinsic.c:2119
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
I do recall running into some sort of problems w.r.t. standards conformance
with this type of intrinsic in array specifications in the past (the details
allude me), so I'm not certain this is legal. However, with a similar code
(without the loop that seems to be causing the problem) I can't get gfortran to
produce an error or warning with any combination of -std and -pedantic, and
size(N) returns the expected value. So if it's not legal code, there's another
bug to go with the ICE!
(*sigh* Another problem of not having standards documents readily available
without forking out cash... or is there a reliable Fortran specification
living on the web somewhere?)
--
Summary: ICE with constant intrinsic array specs
Product: gcc
Version: 4.2.2
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: terry at chem dot gu dot se
GCC host triplet: x86_64-unknown-linux-gnu
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34002
