diff options
| author | Mikael Morin <mikael@gcc.gnu.org> | 2012-08-02 18:30:02 +0000 |
|---|---|---|
| committer | Mikael Morin <mikael@gcc.gnu.org> | 2012-08-02 18:30:02 +0000 |
| commit | 328ece7de3d6903fd6e2c909e1efe1eea59fc8ec (patch) | |
| tree | f10adb4ae49ac21653756591623e2d9073bbf81f /gcc/fortran/trans-expr.c | |
| parent | a8da72b86c262f75d65665c3803a658d8089a679 (diff) | |
| download | gcc-328ece7de3d6903fd6e2c909e1efe1eea59fc8ec.zip gcc-328ece7de3d6903fd6e2c909e1efe1eea59fc8ec.tar.gz gcc-328ece7de3d6903fd6e2c909e1efe1eea59fc8ec.tar.bz2 | |
array.c (gfc_copy_array_ref): Don't copy the offset field.
* array.c (gfc_copy_array_ref): Don't copy the offset field.
* expr.c (find_array_section): Ignore the offset field.
* trans-expr.c (gfc_find_interface_mapping_to_ref): Don't apply
any interface mapping to the offset field.
* gfortran.h (struct gfc_array_ref): Remove the offset field.
From-SVN: r190092
Diffstat (limited to 'gcc/fortran/trans-expr.c')
| -rw-r--r-- | gcc/fortran/trans-expr.c | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/gcc/fortran/trans-expr.c b/gcc/fortran/trans-expr.c index 263605a..2603995 100644 --- a/gcc/fortran/trans-expr.c +++ b/gcc/fortran/trans-expr.c @@ -2806,7 +2806,6 @@ gfc_apply_interface_mapping_to_ref (gfc_interface_mapping * mapping, gfc_apply_interface_mapping_to_expr (mapping, ref->u.ar.end[n]); gfc_apply_interface_mapping_to_expr (mapping, ref->u.ar.stride[n]); } - gfc_apply_interface_mapping_to_expr (mapping, ref->u.ar.offset); break; case REF_COMPONENT: |