From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-bugs-return-138679-listarch-gcc-bugs=gcc.gnu.org@gcc.gnu.org>
Received: (qmail 8035 invoked by alias); 16 Apr 2005 22:51:35 -0000
Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm
Precedence: bulk
List-Archive: <http://gcc.gnu.org/ml/gcc-bugs/>
List-Post: <mailto:gcc-bugs@gcc.gnu.org>
List-Help: <mailto:gcc-bugs-help@gcc.gnu.org>
Sender: gcc-bugs-owner@gcc.gnu.org
Received: (qmail 8021 invoked by uid 48); 16 Apr 2005 22:51:29 -0000
Date: Sat, 16 Apr 2005 22:51:00 -0000
From: "guillemborrell at yahoo dot es" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Message-ID: <20050416225125.21063.guillemborrell@yahoo.es>
Reply-To: gcc-bugzilla@gcc.gnu.org
Subject: [Bug fortran/21063] New: internal compiler error in gfc_conv_ss_descriptor, at fortran/trans-array.c:1224 after using maxloc function
X-Bugzilla-Reason: CC
X-SW-Source: 2005-04/txt/msg02222.txt.bz2
List-Id: <gcc-bugs.sourceware.org>

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