From fe86f537f010828b7f77ff459cef138e84071660 Mon Sep 17 00:00:00 2001 From: "Steven G. Kargl" Date: Tue, 25 Feb 2020 09:25:33 +0100 Subject: [PATCH] Dead code in fortran/simplify.c * simplify.c (degrees_f): Remove unused code. --- gcc/fortran/ChangeLog | 4 ++++ gcc/fortran/simplify.c | 5 ----- 2 files changed, 4 insertions(+), 5 deletions(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index bb273563cc0..d9dd618cc87 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2020-02-25 Steven G. Kargl + + * simplify.c (degrees_f): Remove unused code. + 2020-02-25 Jakub Jelinek PR translation/93864 diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c index 86715d52d90..66ed925c10d 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); -- 2.30.2