Print this page
11210 libm should be cstyle(1ONBLD) clean
@@ -16,13 +16,15 @@
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
+
/*
* Copyright 2011 Nexenta Systems, Inc. All rights reserved.
*/
+
/*
* Copyright 2005 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
@@ -31,15 +33,19 @@
#include "libm.h"
static const float zero = 0.0f;
float
-atanhf(float x) {
+atanhf(float x)
+{
int ix;
ix = *((int *)&x) & ~0x80000000;
+
if (ix > 0x3f800000) /* |x| > 1 or x is nan */
return ((x * zero) / zero);
+
if (ix == 0x3f800000) /* |x| == 1 */
return (x / zero);
+
return ((float)atanh((double)x));
}