[Bug fortran/17917] gfortran ICE on "equivalence"

[paulthomas2 at wanadoo dot fr]

------- Additional Comments From paulthomas2 at wanadoo dot fr  2004-12-18 
11:37 -------
(In reply to comment #1)
> Confirmed.

Note that this bug is provoked by this minimalist version of the above

module test_equiv !Bug 17917
  real    a(2),b(4)
  equivalence (a(1),b(3))
end module test_equiv

However, equivalence does what it should in programs, subroutines and 
functions.  For example, this works correctly:

PROGRAM test_equiv ! .not.Bug 17917
  common b
  real    a(2)
  INTEGER b(4)
  equivalence (a(1),b(3))
  b=(/1,2,3,4/)
  PRINT *,a
end PROGRAM test_equiv



-- 


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