In Mac OSX ver. 10.3, I got following internal compiler error. $ gfortran --version GNU Fortran 95 (GCC) 4.2.0 20060129 (experimental) Copyright (C) 2006 Free Software Foundation, Inc.
GNU Fortran comes with NO WARRANTY, to the extent permitted by law. You may redistribute copies of GNU Fortran under the terms of the GNU General Public License. For more information about these matters, see the file named COPYING $ cat ice.f90 subroutine foo(wk0,g1,g2,ia0,ia1,n2) implicit none integer :: n2 double precision :: a3(3,3) double precision :: a4(3,3) character*72 :: g1(n2) character*72 :: g2(n2) integer :: ia0 integer :: ia1 double precision :: wk0(3) integer :: g,ia2,ia3,ia4,ia5,ia6,ia7,ia8,ia9,j,k,k1,k2,n integer :: wk2(3),wk3(n2),wk6(1) double precision :: a1(3,3),a2(3,3),wk1(n2),wk4(3),wk5(3) double precision :: a5(n2,3) , b wk1(1:3) = 0.0 do k=1,n call f(.true., a3(:,:), g1(ia9), a1, wk4 ,0, 0) call f(.true., a3(:,:), g2(ia9), a2, wk5, 0, 0) if (g(a1,wk4) == 0) return a1 = MATMUL(TRANSPOSE(a4) , a5) enddo if (b < 1.0) then k1 = 0 k2 = 0 b = 1.0 ia2 = 1 ia3 = 1 ia5 = 1 ia6 = 1 ia7 = 1 ia8 = 1 j = 1 wk1(1:4) = wk1(wk3(1:4)) wk2(1) = 1 wk6 = maxloc(wk1(1:3)) endif end subroutine $ gfortran -c -ggdb ice.f90 ice.f90: In function 'foo': ice.f90:21: internal compiler error: in gfc_conv_array_transpose, at fortran/trans-array.c:718 Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. -- Summary: ICE on transpose with specific compiler option Product: gcc Version: 4.2.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: iguchi at coral dot t dot u-tokyo dot ac dot jp http://gcc.gnu.org/bugzilla/show_bug.cgi?id=26119