diff options
author | Steven G. Kargl <kargls@comcast.net> | 2004-05-29 11:33:30 +0000 |
---|---|---|
committer | Paul Brook <pbrook@gcc.gnu.org> | 2004-05-29 11:33:30 +0000 |
commit | e73c80ae862805f76cb4c45de0b1109f5d3e14d5 (patch) | |
tree | 8f097c763c748c75de919d9c99a5c9780a7abb90 /gcc | |
parent | 5ba953549004ce8325163ec9bf2cbd1f045f1913 (diff) | |
download | gcc-e73c80ae862805f76cb4c45de0b1109f5d3e14d5.zip gcc-e73c80ae862805f76cb4c45de0b1109f5d3e14d5.tar.gz gcc-e73c80ae862805f76cb4c45de0b1109f5d3e14d5.tar.bz2 |
* simplify.c (gfc_simplify_log): Remove useless line of code.
From-SVN: r82418
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/fortran/simplify.c | 1 |
2 files changed, 4 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 786cc39..ac79556 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2004-05-29 Steven G. Kargl <kargls@comcast.net> + + * simplify.c (gfc_simplify_log): Remove useless line of code. + 2004-05-29 Paul Brook <paul@codesourcery.com> * trans-common.c (find_equivalence): Find multiple rules. diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c index 2ce86a3..a90d05d 100644 --- a/gcc/fortran/simplify.c +++ b/gcc/fortran/simplify.c @@ -2035,7 +2035,6 @@ gfc_simplify_log (gfc_expr * x) mpf_init (xr); mpf_init (xi); - mpf_div (xr, x->value.complex.i, x->value.complex.r); arctangent2 (&x->value.complex.i, &x->value.complex.r, &result->value.complex.i); |