summaryrefslogtreecommitdiff
path: root/gcc/fortran/trans-stmt.c
diff options
context:
space:
mode:
authorH.J. Lu <hongjiu.lu@intel.com>2007-05-21 21:13:03 +0000
committerH.J. Lu <hjl@gcc.gnu.org>2007-05-21 14:13:03 -0700
commit76dac339660714a2de931e371d89bc54a5cc9782 (patch)
treebfeb8d06856c125ad458839439de86014cc69431 /gcc/fortran/trans-stmt.c
parentccd3cc0992d44f973e5447a4b99d0df1f2a3d89e (diff)
downloadgcc-76dac339660714a2de931e371d89bc54a5cc9782.tar.gz
trans-stmt.c (gfc_trans_do): Fix a typo in comment.
2007-05-21 H.J. Lu <hongjiu.lu@intel.com> * trans-stmt.c (gfc_trans_do): Fix a typo in comment. From-SVN: r124911
Diffstat (limited to 'gcc/fortran/trans-stmt.c')
-rw-r--r--gcc/fortran/trans-stmt.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-stmt.c b/gcc/fortran/trans-stmt.c
index d0af66e60b4..02e8dd26b84 100644
--- a/gcc/fortran/trans-stmt.c
+++ b/gcc/fortran/trans-stmt.c
@@ -818,8 +818,8 @@ gfc_trans_simple_do (gfc_code * code, stmtblock_t *pblock, tree dovar,
body;
cycle_label:
dovar += step
- countm1--;
if (countm1 ==0) goto exit_label;
+ countm1--;
}
exit_label: