summaryrefslogtreecommitdiffstats
path: root/gcc/fortran/trans-common.c
diff options
context:
space:
mode:
authorsayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4>2006-03-17 00:02:53 +0000
committersayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4>2006-03-17 00:02:53 +0000
commit78787e4bead7a62191e20684bf7a82c247e9eba9 (patch)
tree8b3497c0385f850e087ede30b150e5e567d20343 /gcc/fortran/trans-common.c
parent515fdcc2ca08f07efac24d07e06df73230961fd9 (diff)
downloadppe42-gcc-78787e4bead7a62191e20684bf7a82c247e9eba9.tar.gz
ppe42-gcc-78787e4bead7a62191e20684bf7a82c247e9eba9.zip
* 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. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@112162 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/trans-common.c')
-rw-r--r--gcc/fortran/trans-common.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/trans-common.c b/gcc/fortran/trans-common.c
index 3b34b334c2c..3b16e5e0065 100644
--- a/gcc/fortran/trans-common.c
+++ b/gcc/fortran/trans-common.c
@@ -169,6 +169,7 @@ copy_equiv_list_to_ns (segment_info *c)
l->equiv = s;
s->sym = f->sym;
s->offset = f->offset;
+ s->length = f->length;
}
}
OpenPOWER on IntegriCloud