summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorhjl <hjl@138bc75d-0d04-0410-961f-82ee72b054a4>2007-05-21 21:13:03 +0000
committerhjl <hjl@138bc75d-0d04-0410-961f-82ee72b054a4>2007-05-21 21:13:03 +0000
commita205ddf73004a62ecc1db036077da83e117d404e (patch)
treebfeb8d06856c125ad458839439de86014cc69431
parent0145b1e2955e11cce3d6a29411b76f8d845a673d (diff)
downloadppe42-gcc-a205ddf73004a62ecc1db036077da83e117d404e.tar.gz
ppe42-gcc-a205ddf73004a62ecc1db036077da83e117d404e.zip
2007-05-21 H.J. Lu <hongjiu.lu@intel.com>
* trans-stmt.c (gfc_trans_do): Fix a typo in comment. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@124911 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r--gcc/fortran/ChangeLog4
-rw-r--r--gcc/fortran/trans-stmt.c2
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 10886d736df..29dd7a34da3 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+2007-05-21 H.J. Lu <hongjiu.lu@intel.com>
+
+ * trans-stmt.c (gfc_trans_do): Fix a typo in comment.
+
2007-05-21 Paul Thomas <pault@gcc.gnu.org>
PR fortran/31867
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:
OpenPOWER on IntegriCloud