aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran
diff options
context:
space:
mode:
authorSteven G. Kargl <kargl@gcc.gnu.org>2020-02-25 09:25:33 +0100
committerTobias Burnus <tobias@codesourcery.com>2020-02-25 09:25:33 +0100
commitfe86f537f010828b7f77ff459cef138e84071660 (patch)
tree89e26d3251f14f327fd942a67dbb5fcef22d5f24 /gcc/fortran
parent103bc4db7665a03bf2390ccc8ceca0dc5a7a81b7 (diff)
downloadgcc-fe86f537f010828b7f77ff459cef138e84071660.zip
gcc-fe86f537f010828b7f77ff459cef138e84071660.tar.gz
gcc-fe86f537f010828b7f77ff459cef138e84071660.tar.bz2
Dead code in fortran/simplify.c
* simplify.c (degrees_f): Remove unused code.
Diffstat (limited to 'gcc/fortran')
-rw-r--r--gcc/fortran/ChangeLog4
-rw-r--r--gcc/fortran/simplify.c5
2 files changed, 4 insertions, 5 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index bb27356..d9dd618 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+2020-02-25 Steven G. Kargl <kargl@gcc.gnu.org>
+
+ * simplify.c (degrees_f): Remove unused code.
+
2020-02-25 Jakub Jelinek <jakub@redhat.com>
PR translation/93864
diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c
index 86715d5..66ed925 100644
--- a/gcc/fortran/simplify.c
+++ b/gcc/fortran/simplify.c
@@ -1775,11 +1775,6 @@ degrees_f (mpfr_t x, mpfr_rnd_t rnd_mode)
mpfr_t tmp;
mpfr_init (tmp);
- /* Set x = x % 2pi to avoid offsets with large angles. */
- mpfr_const_pi (tmp, rnd_mode);
- mpfr_mul_ui (tmp, tmp, 2, rnd_mode);
- mpfr_fmod (tmp, x, tmp, rnd_mode);
-
/* Set x = x * 180. */
mpfr_mul_ui (x, x, 180, rnd_mode);