This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/26119] New: ICE on transpose with specific compiler option
- From: "iguchi at coral dot t dot u-tokyo dot ac dot jp" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 6 Feb 2006 10:08:34 -0000
- Subject: [Bug fortran/26119] New: ICE on transpose with specific compiler option
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
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