From 30bd4a6cc3a093fdb32db26ee8bc30cd7ef47622 Mon Sep 17 00:00:00 2001 From: Denis Vlasenko Date: Sun, 28 Dec 2008 22:15:07 +0000 Subject: remove many functions which just call __ieee754_, 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 --- libm/e_atanh.c | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) (limited to 'libm/e_atanh.c') 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) -- cgit v1.2.3