diff options
| author | Tobias Burnus <burnus@net-b.de> | 2013-07-22 19:28:56 +0200 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2013-07-22 19:28:56 +0200 |
| commit | 558f3755faa4bc4a15cc4b917d487aca8de09bcb (patch) | |
| tree | b1604215f241ce9033caeeb9f75bd4b1338bba15 /gcc/fortran/class.c | |
| parent | 9ffaa03201577636e08e596570e95b572674681f (diff) | |
| download | gcc-558f3755faa4bc4a15cc4b917d487aca8de09bcb.zip gcc-558f3755faa4bc4a15cc4b917d487aca8de09bcb.tar.gz gcc-558f3755faa4bc4a15cc4b917d487aca8de09bcb.tar.bz2 | |
re PR fortran/57906 (Coarray components: Assignment optimized away (gfortran.dg/coarray/lib_realloc_1.f90))
2013-07-22 Tobias Burnus <burnus@net-b.de>
PR fortran/57906
PR fortran/52052
* class.c (gfc_build_class_symbol): Set coarray_comp.
* trans-array.c (structure_alloc_comps): For coarrays,
directly use the data pointer address.
2013-07-22 Tobias Burnus <burnus@net-b.de>
PR fortran/57906
PR fortran/52052
* coarray/lib_realloc_1.f90: Permit optimization.
* gfortran.dg/coarray_31.f90: New.
From-SVN: r201140
Diffstat (limited to 'gcc/fortran/class.c')
| -rw-r--r-- | gcc/fortran/class.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/class.c b/gcc/fortran/class.c index ba8efa9..51bfd56 100644 --- a/gcc/fortran/class.c +++ b/gcc/fortran/class.c @@ -666,6 +666,7 @@ gfc_build_class_symbol (gfc_typespec *ts, symbol_attribute *attr, fclass->attr.extension = ts->u.derived->attr.extension + 1; fclass->attr.alloc_comp = ts->u.derived->attr.alloc_comp; + fclass->attr.coarray_comp = ts->u.derived->attr.coarray_comp; } fclass->attr.is_class = 1; |