| /bionic/libm/upstream-freebsd/lib/msun/ld128/ |
| H A D | s_exp2l.c | 346 * by i0 = i + TBLSIZE/2.
358 uint32_t hx, ix, i0; local
384 * Reduce x, computing z, i0, and k. The low bits of x + redux
386 * TBLBITS fractional bits (i0). We use bit tricks to extract these
391 * We split this into k = 0xabc and i0 = 0x12 (adjusted to
398 i0 = (u.bits.manl & 0xffffffff) + TBLSIZE / 2;
399 k = (int)i0 >> TBLBITS;
400 i0 = i0 & (TBLSIZE - 1);
413 /* Compute r = exp2(y) = exp2t[i0] *
[all...] |
| /bionic/libm/upstream-freebsd/lib/msun/src/ |
| H A D | s_ceil.c | 35 int32_t i0,i1,j0; local
37 EXTRACT_WORDS(i0,i1,x);
38 j0 = ((i0>>20)&0x7ff)-0x3ff;
42 if(i0<0) {i0=0x80000000;i1=0;}
43 else if((i0|i1)!=0) { i0=0x3ff00000;i1=0;}
47 if(((i0&i)|i1)==0) return x; /* x is integral */
49 if(i0>0) i0
[all...] |
| H A D | s_ceilf.c | 27 int32_t i0,j0; local
30 GET_FLOAT_WORD(i0,x);
31 j0 = ((i0>>23)&0xff)-0x7f;
35 if(i0<0) {i0=0x80000000;}
36 else if(i0!=0) { i0=0x3f800000;}
40 if((i0&i)==0) return x; /* x is integral */
42 if(i0>0) i0
[all...] |
| H A D | s_exp2.c | 333 * by i0 = i + TBLSIZE/2. For cache efficiency, exp2t[] and eps[] are
345 uint32_t hx, ix, lx, i0; local
367 /* Reduce x, computing z, i0, and k. */
369 GET_LOW_WORD(i0, t);
370 i0 += TBLSIZE / 2;
371 k = (i0 >> TBLBITS) << 20;
372 i0 = (i0 & (TBLSIZE - 1)) << 1;
376 /* Compute r = exp2(y) = exp2t[i0] * p(z - eps[i]). */
377 t = tbl[i0]; /* exp2
[all...] |
| H A D | s_exp2f.c | 99 uint32_t hx, ix, i0; local
120 /* Reduce x, computing z, i0, and k. */
122 GET_FLOAT_WORD(i0, t);
123 i0 += TBLSIZE / 2;
124 k = (i0 >> TBLBITS) << 20;
125 i0 &= TBLSIZE - 1;
130 /* Compute r = exp2(y) = exp2ft[i0] * p(z). */
131 tv = exp2ft[i0];
|
| H A D | s_floor.c | 35 int32_t i0,i1,j0; local
37 EXTRACT_WORDS(i0,i1,x);
38 j0 = ((i0>>20)&0x7ff)-0x3ff;
42 if(i0>=0) {i0=i1=0;}
43 else if(((i0&0x7fffffff)|i1)!=0)
44 { i0=0xbff00000;i1=0;}
48 if(((i0&i)|i1)==0) return x; /* x is integral */
50 if(i0<0) i0
[all...] |
| H A D | s_floorf.c | 36 int32_t i0,j0; local
38 GET_FLOAT_WORD(i0,x);
39 j0 = ((i0>>23)&0xff)-0x7f;
43 if(i0>=0) {i0=0;}
44 else if((i0&0x7fffffff)!=0)
45 { i0=0xbf800000;}
49 if((i0&i)==0) return x; /* x is integral */
51 if(i0<0) i0
[all...] |
| H A D | s_modf.c | 35 int32_t i0,i1,j0; local
37 EXTRACT_WORDS(i0,i1,x);
38 j0 = ((i0>>20)&0x7ff)-0x3ff; /* exponent of x */
41 INSERT_WORDS(*iptr,i0&0x80000000,0); /* *iptr = +-0 */
45 if(((i0&i)|i1)==0) { /* x is integral */
52 INSERT_WORDS(*iptr,i0&(~i),0);
75 INSERT_WORDS(*iptr,i0,i1&(~i));
|
| H A D | s_modff.c | 27 int32_t i0,j0; local
29 GET_FLOAT_WORD(i0,x);
30 j0 = ((i0>>23)&0xff)-0x7f; /* exponent of x */
33 SET_FLOAT_WORD(*iptr,i0&0x80000000); /* *iptr = +-0 */
37 if((i0&i)==0) { /* x is integral */
44 SET_FLOAT_WORD(*iptr,i0&(~i));
|
| H A D | s_rint.c | 40 int32_t i0,j0,sx; local
43 EXTRACT_WORDS(i0,i1,x);
44 sx = (i0>>31)&1;
45 j0 = ((i0>>20)&0x7ff)-0x3ff;
48 if(((i0&0x7fffffff)|i1)==0) return x;
49 i1 |= (i0&0x0fffff);
50 i0 &= 0xfffe0000;
51 i0 |= ((i1|-i1)>>12)&0x80000;
52 SET_HIGH_WORD(x,i0);
55 GET_HIGH_WORD(i0,
[all...] |
| H A D | s_rintf.c | 34 int32_t i0,j0,sx; local
36 GET_FLOAT_WORD(i0,x);
37 sx = (i0>>31)&1;
38 j0 = ((i0>>23)&0xff)-0x7f;
41 if((i0&0x7fffffff)==0) return x;
44 GET_FLOAT_WORD(i0,t);
45 SET_FLOAT_WORD(t,(i0&0x7fffffff)|(sx<<31));
|
| H A D | s_trunc.c | 35 int32_t i0,i1,j0; local
37 EXTRACT_WORDS(i0,i1,x);
38 j0 = ((i0>>20)&0x7ff)-0x3ff;
42 i0 &= 0x80000000U;
47 if(((i0&i)|i1)==0) return x; /* x is integral */
49 i0 &= (~i); i1=0;
61 INSERT_WORDS(x,i0,i1);
|
| H A D | s_truncf.c | 33 int32_t i0,j0; local
35 GET_FLOAT_WORD(i0,x);
36 j0 = ((i0>>23)&0xff)-0x7f;
40 i0 &= 0x80000000;
43 if((i0&i)==0) return x; /* x is integral */
45 i0 &= (~i);
51 SET_FLOAT_WORD(x,i0);
|