[Bug fortran/18870] [g77 regression] Equivalencing two common blocks is not caught

[Thomas dot Koenig at online dot de]

------- Additional Comments From Thomas dot Koenig at online dot de  2005-01-11 16:42 -------
I have applied http://gcc.gnu.org/ml/fortran/2005-01/msg00089.html
to the 20050109 snapshot, and now the test case produces a
segfault:

$ cat common-2.f
      program main
      common /foo/ a
      common /bar/ b
      equivalence (a,c)
      equivalence (b,c)
      c=3.
      print *,a
      print *,b
      end
$ gfortran common-2.f
common-2.f: In function 'MAIN__':
common-2.f:6: 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.

I've adjusted the keywords accordingly.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|accepts-invalid             |ice-on-invalid-code


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