From 9c3bb910f26de0d56bb5d734cec58c6329375079 Mon Sep 17 00:00:00 2001 From: Andreas Jaeger Date: Mon, 14 May 2001 08:05:09 +0000 Subject: * locales/ms_MY: Fix entries for Tue and Wednesday. Patch by "Hasbullah Pit (sebol)" . 2001-05-14 Andreas Jaeger * locales/ms_MY: Fix entries for Tue and Wednesday. Patch by "Hasbullah Pit (sebol)" . --- sysdeps/ieee754/ldbl-96/s_tanhl.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'sysdeps/ieee754/ldbl-96/s_tanhl.c') diff --git a/sysdeps/ieee754/ldbl-96/s_tanhl.c b/sysdeps/ieee754/ldbl-96/s_tanhl.c index 1e3dc3b613..5c0ac9a95d 100644 --- a/sysdeps/ieee754/ldbl-96/s_tanhl.c +++ b/sysdeps/ieee754/ldbl-96/s_tanhl.c @@ -77,8 +77,8 @@ static long double one=1.0, two=2.0, tiny = 1.0e-4900L; if (ix < 0x4003 || (ix == 0x4003 && j0 < 0xb8000000u)) {/* |x|<23 */ if ((ix|j0|j1) == 0) return x; /* x == +- 0 */ - if (ix<0x3fc8) /* |x|<2**-55 */ - return x*(one+x); /* tanh(small) = small */ + if (ix<0x3fc8) /* |x|<2**-55 */ + return x*(one+x); /* tanh(small) = small */ if (ix>=0x3fff) { /* |x|>=1 */ t = __expm1l(two*fabsl(x)); z = one - two/(t+two); @@ -90,6 +90,6 @@ static long double one=1.0, two=2.0, tiny = 1.0e-4900L; } else { z = one - tiny; /* raised inexact flag */ } - return (se>0x7fff)? -z: z; + return (se&0x8000)? -z: z; } weak_alias (__tanhl, tanhl) -- cgit 1.4.1