diff options
| author | Mikael Morin <mikael@gcc.gnu.org> | 2010-10-06 15:59:31 +0000 |
|---|---|---|
| committer | Mikael Morin <mikael@gcc.gnu.org> | 2010-10-06 15:59:31 +0000 |
| commit | 3db5d687b485630201b905fae8f54cf39c65cc6a (patch) | |
| tree | 1e4489346bf74d625a3d7f75b6972c82f5b92e10 /gcc/fortran/trans-array.c | |
| parent | 363aab219509999ae48a7c8e5c515e7d82f08474 (diff) | |
| download | gcc-3db5d687b485630201b905fae8f54cf39c65cc6a.zip gcc-3db5d687b485630201b905fae8f54cf39c65cc6a.tar.gz gcc-3db5d687b485630201b905fae8f54cf39c65cc6a.tar.bz2 | |
trans-array.c (gfc_conv_tmp_array_ref): Add factorized call to gfc_advance_se_ss_chain.
2010-10-06 Mikael Morin <mikael@gcc.gnu.org>
* trans-array.c (gfc_conv_tmp_array_ref): Add factorized call to
gfc_advance_se_ss_chain.
* trans-expr.c (gfc_conv_subref_array_ref, gfc_conv_procedure_call,
gfc_conv_array_constructor_expr, gfc_trans_assignment_1): Remove
calls to gfc_advance_se_ss_chain after gfc_conv_tmp_array_ref.
* trans-intrinsic.c (gfc_conv_intrinsic_function): Ditto.
* trans-stmt.c (gfc_trans_where_assign, gfc_trans_where_3): Ditto.
From-SVN: r165046
Diffstat (limited to 'gcc/fortran/trans-array.c')
| -rw-r--r-- | gcc/fortran/trans-array.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c index 271b37c..f70d16e 100644 --- a/gcc/fortran/trans-array.c +++ b/gcc/fortran/trans-array.c @@ -2552,6 +2552,7 @@ gfc_conv_tmp_array_ref (gfc_se * se) { se->string_length = se->ss->string_length; gfc_conv_scalarized_array_ref (se, NULL); + gfc_advance_se_ss_chain (se); } |