/src/lib/libm/src/ |
s_isnanf.c | 32 int32_t ix; local in function:isnanf 33 GET_FLOAT_WORD(ix,x); 34 ix &= 0x7fffffff; 35 ix = 0x7f800000 - ix; 36 return (int)(((u_int32_t)(ix))>>31);
|
s_isinff.c | 22 int32_t ix; local in function:isinff 23 GET_FLOAT_WORD(ix,x); 24 ix &= 0x7fffffff; 25 ix ^= 0x7f800000; 26 return (ix == 0);
|
s_logb.c | 34 int32_t lx,ix; local in function:__strong_alias 35 EXTRACT_WORDS(ix,lx,x); 36 ix &= 0x7fffffff; /* high |x| */ 37 if((ix|lx)==0) return -1.0/fabs(x); 38 if(ix>=0x7ff00000) return x*x; 39 if((ix>>=20)==0) /* IEEE 754 logb */ 42 return (double) (ix-1023);
|
s_logbf.c | 27 int32_t ix; local in function:logbf 28 GET_FLOAT_WORD(ix,x); 29 ix &= 0x7fffffff; /* high |x| */ 30 if(ix==0) return (float)-1.0/fabsf(x); 31 if(ix>=0x7f800000) return x*x; 32 if((ix>>=23)==0) /* IEEE 754 logb */ 35 return (float) (ix-127);
|
e_sqrtf.c | 31 int32_t ix,s,q,m,t,i; local in function:__ieee754_sqrtf 34 GET_FLOAT_WORD(ix,x); 37 if((ix&0x7f800000)==0x7f800000) { 42 if(ix<=0) { 43 if((ix&(~sign))==0) return x;/* sqrt(+-0) = +-0 */ 44 else if(ix<0) 48 m = (ix>>23); 50 for(i=0;(ix&0x00800000)==0;i++) ix<<=1; 54 ix = (ix&0x007fffff)|0x00800000 [all...] |
s_cospif.c | 51 uint32_t ix, jj0; local in function:cospif 53 GET_FLOAT_WORD(ix, x); 54 ix = ix & 0x7fffffff; 55 SET_FLOAT_WORD(ax, ix); 57 if (ix < 0x3f800000) { /* |x| < 1 */ 58 if (ix < 0x3e800000) { /* |x| < 0.25 */ 59 if (ix < 0x38800000) { /* |x| < 0x1p-14 */ 67 if (ix < 0x3f000000) /* |x| < 0.5 */ 69 else if (ix < 0x3f400000) { /* |x| < 0.75 * [all...] |
s_fabsf.c | 31 u_int32_t ix; local in function:fabsf 32 GET_FLOAT_WORD(ix,x); 33 SET_FLOAT_WORD(x,ix&0x7fffffff);
|
s_finitef.c | 35 int32_t ix; local in function:__weak_alias 36 GET_FLOAT_WORD(ix,x); 37 return (int)((u_int32_t)((ix&0x7fffffff)-0x7f800000)>>31);
|
s_cospi.c | 85 uint32_t hx, ix, jj0, lx; local in function:cospi 88 ix = hx & 0x7fffffff; 89 INSERT_WORDS(ax, ix, lx); 91 if (ix < 0x3ff00000) { /* |x| < 1 */ 92 if (ix < 0x3fd00000) { /* |x| < 0.25 */ 93 if (ix < 0x3e200000) { /* |x| < 0x1p-29 */ 100 if (ix < 0x3fe00000) /* |x| < 0.5 */ 102 else if (ix < 0x3fe80000){ /* |x| < 0.75 */ 111 if (ix < 0x43300000) { /* 1 <= |x| < 0x1p52 */ 112 FFLOOR(x, jj0, ix, lx); /* Integer part of ax. * [all...] |
s_frexp.c | 41 int32_t hx, ix, lx; local in function:frexp 43 ix = 0x7fffffff&hx; 45 if(ix>=0x7ff00000||((ix|lx)==0)) return x; /* 0,inf,nan */ 46 if (ix<0x00100000) { /* subnormal */ 49 ix = hx&0x7fffffff; 52 *eptr += ((uint32_t)ix>>20)-1022;
|
s_frexpf.c | 30 int32_t hx,ix; local in function:frexpf 32 ix = 0x7fffffff&hx; 34 if(ix>=0x7f800000||(ix==0)) return x; /* 0,inf,nan */ 35 if (ix<0x00800000) { /* subnormal */ 38 ix = hx&0x7fffffff; 41 *eptr += (ix>>23)-126;
|
s_tan.c | 58 int32_t n, ix; local in function:__weak_alias 61 GET_HIGH_WORD(ix,x); 64 ix &= 0x7fffffff; 65 if(ix <= 0x3fe921fb) return __kernel_tan(x,z,1); 68 else if (ix>=0x7ff00000) return x-x; /* NaN */
|
s_tanf.c | 31 int32_t n, ix; local in function:__weak_alias 33 GET_FLOAT_WORD(ix,x); 36 ix &= 0x7fffffff; 37 if(ix <= 0x3f490fda) return __kernel_tanf(x,z,1); 40 else if (ix>=0x7f800000) return x-x; /* NaN */
|
e_coshf.c | 31 int32_t ix; local in function:__ieee754_coshf 33 GET_FLOAT_WORD(ix,x); 34 ix &= 0x7fffffff; 37 if(ix>=0x7f800000) return x*x; 40 if(ix<0x3eb17218) { 43 if (ix<0x24000000) return w; /* cosh(tiny) = 1 */ 48 if (ix < 0x41b00000) { 54 if (ix < 0x42b17180) return half*__ieee754_expf(fabsf(x)); 57 if (ix<=0x42b2d4fc) {
|
s_tanpif.c | 66 uint32_t hx, ix, jj0; local in function:tanpif 69 ix = hx & 0x7fffffff; 70 SET_FLOAT_WORD(ax, ix); 72 if (ix < 0x3f800000) { /* |x| < 1 */ 73 if (ix < 0x3f000000) { /* |x| < 0.5 */ 74 if (ix < 0x38800000) { /* |x| < 0x1p-14 */ 75 if (ix == 0) 85 } else if (ix == 0x3f000000) 92 if (ix < 0x4b000000) { /* 1 <= |x| < 0x1p23 */ 93 FFLOORF(x, jj0, ix); /* Integer part of ax. * [all...] |
e_sinhf.c | 30 int32_t ix,jx; local in function:__ieee754_sinhf 33 ix = jx&0x7fffffff; 36 if(ix>=0x7f800000) return x+x; 41 if (ix < 0x41b00000) { /* |x|<22 */ 42 if (ix<0x31800000) /* |x|<2**-28 */ 45 if(ix<0x3f800000) return h*((float)2.0*t-t*t/(t+one)); 50 if (ix < 0x42b17180) return h*__ieee754_expf(fabsf(x)); 53 if (ix<=0x42b2d4fc) {
|
s_sinpi.c | 87 uint32_t hx, ix, j0, lx; local in function:sinpi 90 ix = hx & 0x7fffffff; 91 INSERT_WORDS(ax, ix, lx); 93 if (ix < 0x3ff00000) { /* |x| < 1 */ 94 if (ix < 0x3fd00000) { /* |x| < 0.25 */ 95 if (ix < 0x3e200000) { /* |x| < 0x1p-29 */ 115 if (ix < 0x3fe00000) /* |x| < 0.5 */ 117 else if (ix < 0x3fe80000) /* |x| < 0.75 */ 124 if (ix < 0x43300000) { /* 1 <= |x| < 0x1p52 */ 125 FFLOOR(x, j0, ix, lx); /* Integer part of ax. * [all...] |
s_sinpif.c | 57 uint32_t hx, ix, j0; local in function:sinpif 60 ix = hx & 0x7fffffff; 61 SET_FLOAT_WORD(ax, ix); 63 if (ix < 0x3f800000) { /* |x| < 1 */ 64 if (ix < 0x3e800000) { /* |x| < 0.25 */ 65 if (ix < 0x38800000) { /* |x| < 0x1p-14 */ 80 if (ix < 0x3f000000) /* |x| < 0.5 */ 82 else if (ix < 0x3f400000) /* |x| < 0.75 */ 89 if (ix < 0x4b000000) { /* 1 <= |x| < 0x1p23 */ 90 FFLOORF(x, j0, ix); /* Integer part of ax. * [all...] |
s_copysignf.c | 33 u_int32_t ix,iy; local in function:copysignf 34 GET_FLOAT_WORD(ix,x); 36 SET_FLOAT_WORD(x,(ix&0x7fffffff)|(iy&0x80000000));
|
s_cos.c | 59 int32_t n, ix; local in function:__weak_alias 62 GET_HIGH_WORD(ix,x); 65 ix &= 0x7fffffff; 66 if(ix <= 0x3fe921fb) return __kernel_cos(x,z); 69 else if (ix>=0x7ff00000) return x-x;
|
s_cosf.c | 31 int32_t n,ix; local in function:__weak_alias 33 GET_FLOAT_WORD(ix,x); 36 ix &= 0x7fffffff; 37 if(ix <= 0x3f490fd8) return __kernel_cosf(x,z); 40 else if (ix>=0x7f800000) return x-x;
|
s_sin.c | 59 int32_t n, ix; local in function:__weak_alias 62 GET_HIGH_WORD(ix,x); 65 ix &= 0x7fffffff; 66 if(ix <= 0x3fe921fb) return __kernel_sin(x,z,0); 69 else if (ix>=0x7ff00000) return x-x;
|
s_sinf.c | 31 int32_t n, ix; local in function:__weak_alias 33 GET_FLOAT_WORD(ix,x); 36 ix &= 0x7fffffff; 37 if(ix <= 0x3f490fd8) return __kernel_sinf(x,z,0); 40 else if (ix>=0x7f800000) return x-x;
|
/src/games/trek/ |
visual.c | 73 int ix, iy; local in function:visual 82 ix = Ship.sectx + v->x; 84 if (ix < 0 || ix >= NSECTS || iy < 0 || iy >= NSECTS) 87 co = Sect[ix][iy]; 88 printf("%d,%d %c ", ix, iy, co); 90 ix = Ship.sectx + v->x; 92 if (ix < 0 || ix >= NSECTS || iy < 0 || iy >= NSECTS) 95 co = Sect[ix][iy] [all...] |
/src/lib/libm/ld80/ |
s_cospil.c | 51 uint16_t hx, ix; local in function:cospil 54 ix = hx & 0x7fff; 55 INSERT_LDBL80_WORDS(ax, ix, lx); 59 if (ix < 0x3fff) { /* |x| < 1 */ 60 if (ix < 0x3ffd) { /* |x| < 0.25 */ 61 if (ix < 0x3fdd) { /* |x| < 0x1p-34 */ 68 if (ix < 0x3ffe) /* |x| < 0.5 */ 79 if (ix < 0x403e) { /* 1 <= |x| < 0x1p63 */ 80 FFLOORL80(x, j0, ix, lx); /* Integer part of ax. */ 82 EXTRACT_LDBL80_WORDS(ix, lx, ax) [all...] |