When I compile the following program I get an internal compiler error:

> cat test.f95
program test
    real(8)               :: A
    real(8), dimension(1) :: B = (/ 1 /)
    integer, dimension(0) :: S
    S = shape(A)
    A = reshape(B, S)
end program test

> gfortran test.f95
test.f95: In function ‘test’:
test.f95:1: internal compiler error: in gfc_conv_intrinsic_function, at
fortran/trans-intrinsic.c:4888


-- 
           Summary: internal compiler error when calling reshape
           Product: gcc
           Version: 4.4.3
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: tob dot brandt at googlemail dot com
 GCC build triplet: x86_64-linux-gnu
  GCC host triplet: x86_64-linux-gnu
GCC target triplet: x86_64-linux-gnu


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

Reply via email to