diff options
author | Kazu Hirata <kazu@cs.umass.edu> | 2005-04-12 14:10:38 +0000 |
---|---|---|
committer | Kazu Hirata <kazu@gcc.gnu.org> | 2005-04-12 14:10:38 +0000 |
commit | c33063e83743ddc9a9e67132e3d16dd766837986 (patch) | |
tree | f37cdc7e31de85d847c0c791bcac9b392bc69a0f /gcc/fortran/simplify.c | |
parent | a82635d0fe040731bfbe46839e494c3978d335cb (diff) | |
download | gcc-c33063e83743ddc9a9e67132e3d16dd766837986.zip gcc-c33063e83743ddc9a9e67132e3d16dd766837986.tar.gz gcc-c33063e83743ddc9a9e67132e3d16dd766837986.tar.bz2 |
* simplify.c: Fix a comment typo.
From-SVN: r98021
Diffstat (limited to 'gcc/fortran/simplify.c')
-rw-r--r-- | gcc/fortran/simplify.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c index 1ca5b52..8f9f9e4 100644 --- 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); |