[Bug fortran/21063] New: internal compiler error in gfc_conv_ss_descriptor, at fortran/trans-array.c:1224 after using maxloc function

[guillemborrell at yahoo dot es]

Here's the piece of code:

program bug

real, dimension(100) :: dummy
real, dimension(100) :: foo
integer :: i

do i=1,100
  call random_number(dummy(i))
  call random_number(foo(i))
end do

write(*,*) foo(maxloc(dummy))

end program

and the output.
bash-2.05b$ gfc bug.f90
bug.f90: In function 'MAIN__':
bug.f90:12: internal compiler error: in gfc_conv_ss_descriptor, at
fortran/trans-array.c:1224
Please submit a full bug report,

bash-2.05b$ gfc --version
GNU Fortran 95 (GCC 4.1.0 20050416 (experimental))
Copyright (C) 2005 Free Software Foundation, Inc.

-- 
           Summary: internal compiler error in gfc_conv_ss_descriptor, at
                    fortran/trans-array.c:1224 after using maxloc function
           Product: gcc
           Version: 4.1.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: guillemborrell at yahoo dot es
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: i686-pc-linux-gnu
  GCC host triplet: i686-pc-linux-gnu
GCC target triplet: i686-pc-linux-gnu


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=21063