[Bug fortran/31716] segfault with real array bounds

["tkoenig at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #1 from tkoenig at gcc dot gnu dot org  2007-04-26 22:47 -------
My analysis in the original bug report wasn't correct.

Here is a shorter version:

$ cat real-dim-2.f90
program main
  real :: a(2.0),b(2.0)
  a = b
end program main
$ gfortran real-dim-2.f90
real-dim-2.f90:2.12:

  real :: a(2.0),b(2.0)
           1
Error: Expression at (1) must be of INTEGER type
real-dim-2.f90:2.16:

  real :: a(2.0),b(2.0)
               1
Error: The module or main program array 'a' at (1) must have constant shape
real-dim-2.f90:2.19:

  real :: a(2.0),b(2.0)
                  1
Error: Expression at (1) must be of INTEGER type
real-dim-2.f90:2.23:

  real :: a(2.0),b(2.0)
                      1
Error: The module or main program array 'b' at (1) must have constant shape
real-dim-2.f90:0: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.


-- 

tkoenig at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|segfault after mixing       |segfault with real array
                   |declarations and executable |bounds
                   |statements                  |


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