Print this page
11210 libm should be cstyle(1ONBLD) clean
*** 20,29 ****
--- 20,30 ----
*/
/*
* Copyright 2011 Nexenta Systems, Inc. All rights reserved.
*/
+
/*
* Copyright 2006 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
*** 47,67 ****
#pragma weak __acosl = acosl
#include "libm.h"
static const long double zero = 0.0L, one = 1.0L;
-
long double
! acosl(long double x) {
if (isnanl(x))
return (x + x);
else if (fabsl(x) < one)
x = atanl(sqrtl((one - x) / (one + x)));
else if (x == -one)
x = atan2l(one, zero); /* x <- PI */
else if (x == one)
x = zero;
! else { /* |x| > 1 create invalid signal */
return (zero / zero);
! }
return (x + x);
}
--- 48,68 ----
#pragma weak __acosl = acosl
#include "libm.h"
static const long double zero = 0.0L, one = 1.0L;
long double
! acosl(long double x)
! {
if (isnanl(x))
return (x + x);
else if (fabsl(x) < one)
x = atanl(sqrtl((one - x) / (one + x)));
else if (x == -one)
x = atan2l(one, zero); /* x <- PI */
else if (x == one)
x = zero;
! else /* |x| > 1 create invalid signal */
return (zero / zero);
!
return (x + x);
}