* simplify.c: Fix a comment typo.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@98021 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 6d5edb7..8fb368e 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+2005-04-12  Kazu Hirata  <kazu@cs.umass.edu>
+
+       * simplify.c: Fix a comment typo.
+
 2005-04-11  Richard Sandiford  <rsandifo@redhat.com>
 
        * lang.opt: Refer to the GCC internals documentation instead of c.opt.

diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c
index 1ca5b52..8f9f9e4 100644 (file)
--- a/gcc/fortran/simplify.c
+++ b/gcc/fortran/simplify.c
@@ -2322,7 +2322,7 @@ gfc_simplify_nearest (gfc_expr * x, gfc_expr * s)
       else
        {
          /* In this case the exponent can shrink, which makes us skip
-            over one number because we substract one ulp with the
+            over one number because we subtract one ulp with the
             larger exponent.  Thus we need to compensate for this.  */
          mpfr_init_set (tmp, result->value.real, GFC_RND_MODE);