summaryrefslogtreecommitdiffstats
path: root/libm/e_atanh.c
diff options
context:
space:
mode:
authorDenis Vlasenko <vda.linux@googlemail.com>2008-12-28 22:15:26 +0000
committerDenis Vlasenko <vda.linux@googlemail.com>2008-12-28 22:15:26 +0000
commit657f68a8f714863321c29dd23aa18f0d5ab40d65 (patch)
treef34d83fa156f971b8201d1687062dfc276d4c820 /libm/e_atanh.c
parenta5ed82b5f226456bc5dd86b4ee36e4175b4abe2a (diff)
downloaduClibc-alpine-657f68a8f714863321c29dd23aa18f0d5ab40d65.tar.bz2
uClibc-alpine-657f68a8f714863321c29dd23aa18f0d5ab40d65.tar.xz
remove many functions which just call __ieee754_<function>,
define them as aliases instead. text data bss dec hex filename - 45402 180 4 45586 b212 lib/libm-0.9.30-svn.so + 45302 180 4 45486 b1ae lib/libm-0.9.30-svn.so
Diffstat (limited to 'libm/e_atanh.c')
-rw-r--r--libm/e_atanh.c23
1 files changed, 23 insertions, 0 deletions
diff --git a/libm/e_atanh.c b/libm/e_atanh.c
index 673ef0cd6..5cf4da3b8 100644
--- a/libm/e_atanh.c
+++ b/libm/e_atanh.c
@@ -54,3 +54,26 @@ double attribute_hidden __ieee754_atanh(double x)
t = 0.5*log1p((x+x)/(one-x));
if(hx>=0) return t; else return -t;
}
+
+/*
+ * wrapper atanh(x)
+ */
+#ifndef _IEEE_LIBM
+double atanh(double x)
+{
+ double z, y;
+ z = __ieee754_atanh(x);
+ if (_LIB_VERSION == _IEEE_ || isnan(x))
+ return z;
+ y = fabs(x);
+ if (y >= 1.0) {
+ if (y > 1.0)
+ return __kernel_standard(x, x, 30); /* atanh(|x|>1) */
+ return __kernel_standard(x, x, 31); /* atanh(|x|==1) */
+ }
+ return z;
+}
+#else
+strong_alias(__ieee754_atanh, atanh)
+#endif
+libm_hidden_def(atanh)