diff options
author | hjl <hjl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-01-18 19:24:41 +0000 |
---|---|---|
committer | hjl <hjl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-01-18 19:24:41 +0000 |
commit | d520d7b982bfabcab5b13e7498ffb090515089f2 (patch) | |
tree | 29f76c2681111b11caf8f9d9d963a7fc087c04c5 /gcc | |
parent | 7d53ef7c8470b91623b7f8a3d2c595d5f93e445d (diff) | |
download | gcc-d520d7b982bfabcab5b13e7498ffb090515089f2.tar.gz |
2007-01-18 H.J. Lu <hongjiu.lu@intel.com>
* trans-stmt.c (compute_overall_iter_number): Fix a typo.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@120915 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/fortran/trans-stmt.c | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 671a21ebfc6..103b259f3ce 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2007-01-18 H.J. Lu <hongjiu.lu@intel.com> + + * trans-stmt.c (compute_overall_iter_number): Fix a typo. + 2007-01-18 Roger Sayle <roger@eyesopen.com> * trans-expr.c (copyable_array_p): Consider user derived types without diff --git a/gcc/fortran/trans-stmt.c b/gcc/fortran/trans-stmt.c index c36d6faf0e9..47a846eac9a 100644 --- a/gcc/fortran/trans-stmt.c +++ b/gcc/fortran/trans-stmt.c @@ -2057,7 +2057,7 @@ compute_overall_iter_number (forall_info *nested_forall_info, tree inner_size, forall_tmp; forall_tmp = forall_tmp->next_nest) tmp = fold_build2 (MULT_EXPR, gfc_array_index_type, - tmp, forall->size); + tmp, forall_tmp->size); return tmp; } } |