$ cat foo.f program test parameter (datasize = 1000) dimension idata(datasize) idata(1) = -1 end
$ gfortran foo.f foo.f:3.22: dimension idata(datasize) 1 Error: Expression at (1) must be of INTEGER type foo.f:3.21: dimension idata(datasize) 1 Error: The module or main program array 'idata' at (1) must have constant shape foo.f:5.72: end 1 Internal Error at (1): compare_bound(): Bad expression -- Summary: ICE with array(real) declaration Product: gcc Version: 4.3.0 Status: UNCONFIRMED Keywords: ice-on-invalid-code, error-recovery Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: tkoenig at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34305