------- Comment #6 from dominiq at lps dot ens dot fr 2008-10-01 12:09 ------- Reduced code:
program three_body real, parameter :: n = 2, d = 2 real, dimension(n,d) :: x x(1,:) = (/ 1.0, 0.0 /) end program three_body gives pr36192_ice.f90:3.18: real, dimension(n,d) :: x 1 Error: Expression at (1) must be of INTEGER type pr36192_ice.f90:3.20: real, dimension(n,d) :: x 1 Error: Expression at (1) must be of INTEGER type pr36192_ice.f90:3.27: real, dimension(n,d) :: x 1 Error: The module or main program array 'x' at (1) must have constant shape f951: internal compiler error: Bus error Please submit a full bug report, with preprocessed source if appropriate. See <http://gcc.gnu.org/bugs.html> for instructions. The ICE disappears if the line x(1,:) = (/ 1.0, 0.0 /) is commented. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36192