[Bug fortran/16520] New: ICE in gfortran.dg/g77/19990905-1.f

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

Test gfortran.dg/g77/19990905-1.f (from g77.f-torture/noncompile)
ICEs with gfortran.  This is not valid code

Code is:

c { dg-do compile }
c
c  g77 gave error
c  19990905-1.f: In subroutine `x':
c  19990905-1.f:15: 
c           common /foo/n
c                   1
c  19990905-1.f:18: (continued):
c           call foo(a(1))
c                2
c  Invalid declaration of or reference to symbol `foo' at (2) [initially seen 
at (1)]
* =foo7.f in Burley's g77 test suite.
      subroutine x
      real a(n)
      common /foo/n
      continue
      entry y(a)
      call foo(a(1))
      end
c { dg-excess-errors "" }

gfortran output is:

$ ./gfortran -B. -c -
O0 /usr/local/src/gcc/gcc/testsuite/gfortran.dg/g77/19990905-1.f
assertion "sym->backend_decl" failed: 
file "/usr/local/src/gcc/gcc/fortran/trans-decl.c", line 717
/usr/local/src/gcc/gcc/testsuite/gfortran.dg/g77/19990905-1.f: In function `x':
/usr/local/src/gcc/gcc/testsuite/gfortran.dg/g77/19990905-1.f:13: internal 
compiler error: Aborted
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.

-- 
           Summary: ICE in gfortran.dg/g77/19990905-1.f
           Product: gcc
           Version: 3.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: billingd at gcc dot gnu dot org
                CC: gcc-bugs at gcc dot gnu dot org
  GCC host triplet: i686-pc-cygwin


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