Print this page
11210 libm should be cstyle(1ONBLD) clean

*** 20,37 **** */ /* * Copyright 2011 Nexenta Systems, Inc. All rights reserved. */ /* * Copyright 2006 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */ #include "libm.h" ! /* INDENT OFF */ /* * void __k_sincosf(double x, float *s, float *c); * kernel (float) sincos function on [-pi/4, pi/4], pi/4 ~ 0.785398164 * Input x is in double and assumed to be bounded by ~pi/4 in magnitude. * --- 20,38 ---- */ /* * Copyright 2011 Nexenta Systems, Inc. All rights reserved. */ + /* * Copyright 2006 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */ #include "libm.h" ! /* * void __k_sincosf(double x, float *s, float *c); * kernel (float) sincos function on [-pi/4, pi/4], pi/4 ~ 0.785398164 * Input x is in double and assumed to be bounded by ~pi/4 in magnitude. *
*** 56,79 **** * The hexadecimal values are the intended ones for the following constants. * The decimal values may be used, provided that the compiler will convert * from decimal to binary accurately enough to produce the hexadecimal values * shown. */ - /* INDENT ON */ static const double q[] = { ! /* S0 = */ 1.85735322054308378716204874632872525989806770558e-0003, /* S1 = */ -1.95035094218403635082921458859320791358115801259e-0004, /* S2 = */ 5.38400550766074785970952495168558701485841707252e+0002, /* S3 = */ -3.31975110777873728964197739157371509422022905947e+0001, /* C0 = */ 1.09349482127188401868272000389539985058873853699e-0003, /* C1 = */ -5.03324285989964979398034700054920226866107675091e-0004, /* C2 = */ 2.43792880266971107750418061559602239831538067410e-0005, /* C3 = */ 9.14499072605666582228127405245558035523741471271e+0002, ! /* C4 = */ -3.63151270591815439197122504991683846785293207730e+0001, ! }; ! #define S0 q[0] #define S1 q[1] #define S2 q[2] #define S3 q[3] --- 57,78 ---- * The hexadecimal values are the intended ones for the following constants. * The decimal values may be used, provided that the compiler will convert * from decimal to binary accurately enough to produce the hexadecimal values * shown. */ static const double q[] = { ! /* S0 = */ ! 1.85735322054308378716204874632872525989806770558e-0003, /* S1 = */ -1.95035094218403635082921458859320791358115801259e-0004, /* S2 = */ 5.38400550766074785970952495168558701485841707252e+0002, /* S3 = */ -3.31975110777873728964197739157371509422022905947e+0001, /* C0 = */ 1.09349482127188401868272000389539985058873853699e-0003, /* C1 = */ -5.03324285989964979398034700054920226866107675091e-0004, /* C2 = */ 2.43792880266971107750418061559602239831538067410e-0005, /* C3 = */ 9.14499072605666582228127405245558035523741471271e+0002, ! /* C4 = */ -3.63151270591815439197122504991683846785293207730e+0001, }; #define S0 q[0] #define S1 q[1] #define S2 q[2] #define S3 q[3]
*** 82,101 **** #define C2 q[6] #define C3 q[7] #define C4 q[8] void ! __k_sincosf(double x, float *s, float *c) { double z; int hx; ! hx = ((int *) &x)[HIWORD]; /* hx = leading x */ /* small argument */ if ((hx & ~0x80000000) < 0x3f100000) { /* if |x| < 2**-14 */ ! *s = (float) x; *c = (float) 1; ! if ((int) x == 0) /* raise inexact if x != 0 */ return; } z = x * x; ! *s = (float) ((x * (S0 + z * S1)) * (S2 + z * (S3 + z))); ! *c = (float) (((C0 + z * C1) + (z * z) * C2) * (C3 + z * (C4 + z))); } --- 81,105 ---- #define C2 q[6] #define C3 q[7] #define C4 q[8] void ! __k_sincosf(double x, float *s, float *c) ! { double z; int hx; ! hx = ((int *)&x)[HIWORD]; /* hx = leading x */ ! /* small argument */ if ((hx & ~0x80000000) < 0x3f100000) { /* if |x| < 2**-14 */ ! *s = (float)x; ! *c = (float)1; ! ! if ((int)x == 0) /* raise inexact if x != 0 */ return; } + z = x * x; ! *s = (float)((x * (S0 + z * S1)) * (S2 + z * (S3 + z))); ! *c = (float)(((C0 + z * C1) + (z * z) * C2) * (C3 + z * (C4 + z))); }