diff options
| author | Mikael Morin <mikael@gcc.gnu.org> | 2011-11-03 21:03:56 +0000 |
|---|---|---|
| committer | Mikael Morin <mikael@gcc.gnu.org> | 2011-11-03 21:03:56 +0000 |
| commit | 37f14472174cb0e4826c447859c98a6379f1405a (patch) | |
| tree | 8d58b8e14089fcfafc63c5f0e533b1f064cab00c /gcc/fortran/trans-array.c | |
| parent | 1190b611294c89712de7a10d2fe21359f1541f58 (diff) | |
| download | gcc-37f14472174cb0e4826c447859c98a6379f1405a.zip gcc-37f14472174cb0e4826c447859c98a6379f1405a.tar.gz gcc-37f14472174cb0e4826c447859c98a6379f1405a.tar.bz2 | |
trans-array.c (get_array_ref_dim): Remove redundant condition.
* trans-array.c (get_array_ref_dim): Remove redundant condition.
From-SVN: r180849
Diffstat (limited to 'gcc/fortran/trans-array.c')
| -rw-r--r-- | gcc/fortran/trans-array.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c index f615e4e..c7eaf66 100644 --- a/gcc/fortran/trans-array.c +++ b/gcc/fortran/trans-array.c @@ -815,7 +815,7 @@ get_array_ref_dim (gfc_ss_info *info, int loop_dim) array_dim = info->dim[loop_dim]; for (n = 0; n < info->dimen; n++) - if (n != loop_dim && info->dim[n] < array_dim) + if (info->dim[n] < array_dim) array_ref_dim++; return array_ref_dim; |