C:\mingw\bugs>type bug.f90
subroutine dummy
contains
function quadric(a,b) result(c)
intent(in) a,b; dimension a(0:3),b(0:3),c(0:9)
c(0)=a(0)*b(0); c(1:3)=a(1:)*b(0)+a(0)*b(1:); c(4:6)=a(1:)*b(1:)
c(7:9)=(/a(1)*b(2)+b(1)*a(2),a(1)*b(3)+b(1)*a(3),a(2)*b(3)+b(2)*a(3)/)
end function
end
C:\mingw\bugs>gfortran -c -v bug.f90
Using built-in specs.
Target: i386-pc-mingw32
Configured with:
../trunk/configure --prefix=/mingw --enable-languages=c,fortran --with-gmp=/hom
Thread model: win32
gcc version 4.3.0 20070506 (experimental)
c:/program files/gfortran/bin/../libexec/gcc/i386-pc-mingw32/4.3.0/f951.exe
bug.f90 -quiet -dum
GNU F95 version 4.3.0 20070506 (experimental) (i386-pc-mingw32)
compiled by GNU C version 4.3.0 20070506 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
bug.f90: In function 'quadric':
bug.f90:3: internal compiler error: in gfc_trans_dummy_array_bias, at
fortran/trans-array.c:3999
Please submit a full bug report,
with preprocessed source if appropriate.
