diff options
| author | mikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-11-25 20:24:10 +0000 |
|---|---|---|
| committer | mikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-11-25 20:24:10 +0000 |
| commit | ccf40a7d58ecd27d87c43ec7eb6e957cc172c8f7 (patch) | |
| tree | 38c3a41111bd737c9492d8f2b0f753c8c3d98aee | |
| parent | b6f42c2cc3f50fa7c7982585574b9bee5536035e (diff) | |
| download | gcc-ccf40a7d58ecd27d87c43ec7eb6e957cc172c8f7.tar.gz | |
* trans-array.c (set_loop_bounds): Remove dead conditions.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181731 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/fortran/trans-array.c | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index d669f5aedf6..4ee062c23e7 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,9 @@ 2011-11-25 Mikael Morin <mikael@gcc.gnu.org> + * trans-array.c (set_loop_bounds): Remove dead conditions. + +2011-11-25 Mikael Morin <mikael@gcc.gnu.org> + PR fortran/51250 PR fortran/43829 * trans-array.c (gfc_trans_create_temp_array): Get dimension from diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c index 943503a4274..ee8f89693b4 100644 --- a/gcc/fortran/trans-array.c +++ b/gcc/fortran/trans-array.c @@ -4341,9 +4341,9 @@ set_loop_bounds (gfc_loopinfo *loop) } /* Transform everything so we have a simple incrementing variable. */ - if (n < loop->dimen && integer_onep (info->stride[dim])) + if (integer_onep (info->stride[dim])) info->delta[dim] = gfc_index_zero_node; - else if (n < loop->dimen) + else { /* Set the delta for this section. */ info->delta[dim] = gfc_evaluate_now (loop->from[n], &loop->pre); |