diff options
author | Roger Sayle <roger@eyesopen.com> | 2006-03-17 00:02:53 +0000 |
---|---|---|
committer | Roger Sayle <sayle@gcc.gnu.org> | 2006-03-17 00:02:53 +0000 |
commit | 37311e710c998b30f5d535b0cd98b5aa88db14cc (patch) | |
tree | 8b3497c0385f850e087ede30b150e5e567d20343 /gcc/fortran/gfortran.h | |
parent | 620b87b3cede2575e47da115ab8d1a6047dc5c06 (diff) | |
download | gcc-37311e710c998b30f5d535b0cd98b5aa88db14cc.zip gcc-37311e710c998b30f5d535b0cd98b5aa88db14cc.tar.gz gcc-37311e710c998b30f5d535b0cd98b5aa88db14cc.tar.bz2 |
gfortran.h (gfc_equiv_info): Add length field.
* gfortran.h (gfc_equiv_info): Add length field.
* trans-common.c (copy_equiv_list_to_ns): Set the length field.
* dependency.c (gfc_are_equivalenced_arrays): Use both the offset
and length fields to determine whether the two equivalenced symbols
overlap in memory.
* gfortran.dg/dependency_13.f90: New test case.
From-SVN: r112162
Diffstat (limited to 'gcc/fortran/gfortran.h')
-rw-r--r-- | gcc/fortran/gfortran.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h index 2a5d01c..24c92b3 100644 --- a/gcc/fortran/gfortran.h +++ b/gcc/fortran/gfortran.h @@ -1352,6 +1352,7 @@ typedef struct gfc_equiv_info { gfc_symbol *sym; HOST_WIDE_INT offset; + HOST_WIDE_INT length; struct gfc_equiv_info *next; } gfc_equiv_info; |