From 2e7ca27b995016d4ddc7e75b4bec2ffa3f193b2e Mon Sep 17 00:00:00 2001
From: ghazi <ghazi@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Sat, 3 Feb 2007 20:49:51 +0000
Subject: [PATCH] * emit-rtl.c (dconstpi): Delete. (dconstsqrt2):
New. (init_emit_once): Delete dconstpi and init dconstsqrt2. *
real.h (dconstpi): Delete. (dconstsqrt2): New. * builtins.c
(fold_builtin_cabs): Use dconstsqrt2. (fold_builtin_hypot): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@121550 138bc75d-0d04-0410-961f-82ee72b054a4
---
gcc/ChangeLog | 10 ++++++++++
gcc/builtins.c | 14 ++++++--------
gcc/emit-rtl.c | 6 +++---
gcc/real.h | 2 +-
4 files changed, 20 insertions(+), 12 deletions(-)
diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index e5287e272723..b6ccf374c96c 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,13 @@
+2007-02-03 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
+
+ * emit-rtl.c (dconstpi): Delete.
+ (dconstsqrt2): New.
+ (init_emit_once): Delete dconstpi and init dconstsqrt2.
+ * real.h (dconstpi): Delete.
+ (dconstsqrt2): New.
+ * builtins.c (fold_builtin_cabs): Use dconstsqrt2.
+ (fold_builtin_hypot): Likewise.
+
2007-02-03 Tom Tromey <tromey@redhat.com>
PR driver/30246
diff --git a/gcc/builtins.c b/gcc/builtins.c
index b7ce1e4c5d82..b7ff78203f81 100644
--- a/gcc/builtins.c
+++ b/gcc/builtins.c
@@ -7158,13 +7158,12 @@ fold_builtin_cabs (tree arglist, tree type, tree fndecl)
if (flag_unsafe_math_optimizations
&& operand_equal_p (real, imag, OEP_PURE_SAME))
{
- REAL_VALUE_TYPE sqrt2;
-
- real_sqrt (&sqrt2, TYPE_MODE (type), &dconst2);
+ const REAL_VALUE_TYPE sqrt2_trunc
+ = real_value_truncate (TYPE_MODE (type), dconstsqrt2);
STRIP_NOPS (real);
return fold_build2 (MULT_EXPR, type,
fold_build1 (ABS_EXPR, type, real),
- build_real (type, sqrt2));
+ build_real (type, sqrt2_trunc));
}
}
@@ -8059,12 +8058,11 @@ fold_builtin_hypot (tree fndecl, tree arglist, tree type)
if (flag_unsafe_math_optimizations
&& operand_equal_p (arg0, arg1, OEP_PURE_SAME))
{
- REAL_VALUE_TYPE sqrt2;
-
- real_sqrt (&sqrt2, TYPE_MODE (type), &dconst2);
+ const REAL_VALUE_TYPE sqrt2_trunc
+ = real_value_truncate (TYPE_MODE (type), dconstsqrt2);
return fold_build2 (MULT_EXPR, type,
fold_build1 (ABS_EXPR, type, arg0),
- build_real (type, sqrt2));
+ build_real (type, sqrt2_trunc));
}
return NULL_TREE;
diff --git a/gcc/emit-rtl.c b/gcc/emit-rtl.c
index 94381a9e16c1..1faa57ffedb6 100644
--- a/gcc/emit-rtl.c
+++ b/gcc/emit-rtl.c
@@ -105,7 +105,7 @@ REAL_VALUE_TYPE dconstm1;
REAL_VALUE_TYPE dconstm2;
REAL_VALUE_TYPE dconsthalf;
REAL_VALUE_TYPE dconstthird;
-REAL_VALUE_TYPE dconstpi;
+REAL_VALUE_TYPE dconstsqrt2;
REAL_VALUE_TYPE dconste;
/* All references to the following fixed hard registers go through
@@ -5154,8 +5154,8 @@ init_emit_once (int line_numbers)
/* Initialize mathematical constants for constant folding builtins.
These constants need to be given to at least 160 bits precision. */
- real_from_string (&dconstpi,
- "3.1415926535897932384626433832795028841971693993751058209749445923078");
+ real_from_string (&dconstsqrt2,
+ "1.4142135623730950488016887242096980785696718753769480731766797379907");
real_from_string (&dconste,
"2.7182818284590452353602874713526624977572470936999595749669676277241");
diff --git a/gcc/real.h b/gcc/real.h
index 81ee855dbfae..fda1095b1bc8 100644
--- a/gcc/real.h
+++ b/gcc/real.h
@@ -387,7 +387,7 @@ extern REAL_VALUE_TYPE dconstm1;
extern REAL_VALUE_TYPE dconstm2;
extern REAL_VALUE_TYPE dconsthalf;
extern REAL_VALUE_TYPE dconstthird;
-extern REAL_VALUE_TYPE dconstpi;
+extern REAL_VALUE_TYPE dconstsqrt2;
extern REAL_VALUE_TYPE dconste;
/* Function to return a real value (not a tree node)
--
GitLab