re PR fortran/18833 (ICE 'missing spec' on integer/char equivalence)
authorJakub Jelinek <jakub@redhat.com>
Sat, 6 Aug 2005 10:00:53 +0000 (12:00 +0200)
committerJakub Jelinek <jakub@gcc.gnu.org>
Sat, 6 Aug 2005 10:00:53 +0000 (12:00 +0200)
commita8006d0933c8c954b134152c1fb60a379c7fb846
tree51307a287fe8c7944a34211fdcee41233244ad4a
parentb17775aba4c709c1fc3f19af33d50b025e3891f4
re PR fortran/18833 (ICE 'missing spec' on integer/char equivalence)

PR fortran/18833
PR fortran/20850
* primary.c (match_varspec): If equiv_flag, don't look at sym's
attributes, call gfc_match_array_ref up to twice and don't do any
substring or component processing.
* resolve.c (resolve_equivalence): Transform REF_ARRAY into
REF_SUBSTRING or nothing if needed.  Check that substrings
don't have zero length.

* gfortran.dg/equiv_1.f90: New test.
* gfortran.dg/equiv_2.f90: New test.
* gfortran.fortran-torture/execute/equiv_2.f90: New test.
* gfortran.fortran-torture/execute/equiv_3.f90: New test.
* gfortran.fortran-torture/execute/equiv_4.f90: New test.

From-SVN: r102801
gcc/fortran/ChangeLog
gcc/fortran/primary.c
gcc/fortran/resolve.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/equiv_1.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/equiv_2.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.fortran-torture/execute/equiv_2.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.fortran-torture/execute/equiv_3.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.fortran-torture/execute/equiv_4.f90 [new file with mode: 0644]