Fix types of constants in k_casinh*.c.

diff --git a/ChangeLog b/ChangeLog
index 3bbcf36..d719501 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2013-03-19  Joseph Myers  <joseph@codesourcery.com>
+
+       * math/k_casinhf.c (__kernel_casinhf): Consistently use float
+       constants.
+       * math/k_casinhl.c (__kernel_casinhl): Consistently use long
+       double constants.
+
 2013-03-19  Andreas Schwab  <schwab@suse.de>
 
        * sysdeps/gnu/configure.in: Set libc_cv_rtldir for s390x.

diff --git a/math/k_casinhf.c b/math/k_casinhf.c
index 3152ea2..7ff4b03 100644 (file)
--- a/math/k_casinhf.c
+++ b/math/k_casinhf.c
@@ -79,8 +79,8 @@ __kernel_casinhf (__complex__ float x, int adj)
     }
   else
     {
-      __real__ y = (rx - ix) * (rx + ix) + 1.0;
-      __imag__ y = 2.0 * rx * ix;
+      __real__ y = (rx - ix) * (rx + ix) + 1.0f;
+      __imag__ y = 2.0f * rx * ix;
 
       y = __csqrtf (y);
 

diff --git a/math/k_casinhl.c b/math/k_casinhl.c
index 110ae33..aec501b 100644 (file)
--- a/math/k_casinhl.c
+++ b/math/k_casinhl.c
@@ -86,8 +86,8 @@ __kernel_casinhl (__complex__ long double x, int adj)
     }
   else
     {
-      __real__ y = (rx - ix) * (rx + ix) + 1.0;
-      __imag__ y = 2.0 * rx * ix;
+      __real__ y = (rx - ix) * (rx + ix) + 1.0L;
+      __imag__ y = 2.0L * rx * ix;
 
       y = __csqrtl (y);