/netbsd-current/lib/libm/src/ |
H A D | s_isnan.c | 29 int32_t hx,lx; local 30 EXTRACT_WORDS(hx,lx,x); 31 hx &= 0x7fffffff; 32 hx |= (u_int32_t)(lx|(-lx))>>31; 33 hx = 0x7ff00000 - hx; 34 return (int)((u_int32_t)(hx))>>31;
|
H A D | s_isinf.c | 22 int32_t hx,lx; local 23 EXTRACT_WORDS(hx,lx,x); 24 hx &= 0x7fffffff; 25 hx ^= 0x7ff00000; 26 hx |= lx; 27 return (hx == 0);
|
H A D | e_fmodf.c | 35 int32_t n,hx,hy,hz,ix,iy,sx,i; local 37 GET_FLOAT_WORD(hx,x); 39 sx = hx&0x80000000; /* sign of x */ 40 hx ^=sx; /* |x| */ 44 if(hy==0||(hx>=0x7f800000)|| /* y=0,or x not finite */ 47 if(hx<hy) return x; /* |x|<|y| return x */ 48 if(hx==hy) 52 if(hx<0x00800000) { /* subnormal x */ 53 for (ix = -126,i=(hx<<8); i>0; i<<=1) ix -=1; 54 } else ix = (hx>>2 [all...] |
H A D | s_ilogbf.c | 32 int32_t hx, ix; local 34 GET_FLOAT_WORD(hx, x); 35 hx &= 0x7fffffff; 36 if (hx < 0x00800000) { 37 if (hx == 0) { 41 for (ix = -126, hx <<= 8; hx > 0; hx <<= 1) ix -= 1; 45 if (hx < 0x7f800000) { 46 return (hx >> 2 [all...] |
H A D | s_nextafterf.c | 27 int32_t hx,hy,ix,iy; local 29 GET_FLOAT_WORD(hx,x); 31 ix = hx&0x7fffffff; /* |x| */ 43 if(hx>=0) { /* x > 0 */ 44 if(hx>hy) { /* x > y, x -= ulp */ 45 hx -= 1; 47 hx += 1; 50 if(hy>=0||hx>hy){ /* x < y, x -= ulp */ 51 hx -= 1; 53 hx [all...] |
H A D | s_finite.c | 32 int32_t hx; local 33 GET_HIGH_WORD(hx,x); 34 return (int)((u_int32_t)((hx&0x7fffffff)-0x7ff00000)>>31);
|
H A D | s_frexpf.c | 30 int32_t hx,ix; local 31 GET_FLOAT_WORD(hx,x); 32 ix = 0x7fffffff&hx; 37 GET_FLOAT_WORD(hx,x); 38 ix = hx&0x7fffffff; 42 hx = (hx&0x807fffff)|0x3f000000; 43 SET_FLOAT_WORD(x,hx);
|
H A D | s_frexp.c | 41 int32_t hx, ix, lx; local 42 EXTRACT_WORDS(hx,lx,x); 43 ix = 0x7fffffff&hx; 48 GET_HIGH_WORD(hx,x); 49 ix = hx&0x7fffffff; 53 hx = (hx&0x800fffff)|0x3fe00000; 54 SET_HIGH_WORD(x,hx);
|
H A D | e_log10.c | 66 int32_t i,k,hx; local 69 EXTRACT_WORDS(hx,lx,x); 72 if (hx < 0x00100000) { /* x < 2**-1022 */ 73 if (((hx&0x7fffffff)|lx)==0) 75 if (hx<0) return (x-x)/zero; /* log(-#) = NaN */ 77 GET_HIGH_WORD(hx,x); 79 if (hx >= 0x7ff00000) return x+x; 80 k += (hx>>20)-1023; 82 hx = (hx [all...] |
H A D | e_log10f.c | 36 int32_t i,k,hx; local 38 GET_FLOAT_WORD(hx,x); 41 if (hx < 0x00800000) { /* x < 2**-126 */ 42 if ((hx&0x7fffffff)==0) 44 if (hx<0) return (x-x)/zero; /* log(-#) = NaN */ 46 GET_FLOAT_WORD(hx,x); 48 if (hx >= 0x7f800000) return x+x; 49 k += (hx>>23)-127; 51 hx = (hx [all...] |
H A D | s_ilogb.c | 39 int32_t hx, lx, ix; local 41 GET_HIGH_WORD(hx, x); 42 hx &= 0x7fffffff; 43 if (hx < 0x00100000) { 45 if ((hx | lx) == 0) { 49 if (hx == 0) { 52 for (ix = -1022, hx <<= 11; hx > 0; hx <<= 1) ix -= 1; 57 if (hx < [all...] |
H A D | s_remquof.c | 37 int32_t n,hx,hy,hz,ix,iy,sx,i; local 40 GET_FLOAT_WORD(hx,x); 42 sxy = (hx ^ hy) & 0x80000000; 43 sx = hx&0x80000000; /* sign of x */ 44 hx ^=sx; /* |x| */ 48 if(hy==0||hx>=0x7f800000||hy>0x7f800000) /* y=0,NaN;or x not finite */ 50 if(hx<hy) { 53 } else if(hx==hy) { 59 if(hx<0x00800000) { /* subnormal x */ 60 for (ix = -126,i=(hx<< [all...] |
/netbsd-current/external/gpl3/gcc/dist/libquadmath/math/ |
H A D | isnanq.c | 29 int64_t hx,lx; local 30 GET_FLT128_WORDS64(hx,lx,x); 31 hx &= 0x7fffffffffffffffLL; 32 hx |= (uint64_t)(lx|(-lx))>>63; 33 hx = 0x7fff000000000000LL - hx; 34 return (int)((uint64_t)hx>>63);
|
H A D | logbq.c | 31 int64_t lx, hx, ex; local 33 GET_FLT128_WORDS64 (hx, lx, x); 34 hx &= 0x7fffffffffffffffLL; /* high |x| */ 35 if ((hx | lx) == 0) 37 if (hx >= 0x7fff000000000000LL) 39 if ((ex = hx >> 48) == 0) /* IEEE 754 logb */ 44 if (hx == 0) 47 ma = __builtin_clzll (hx);
|
H A D | fabsq.c | 28 uint64_t hx; local 29 GET_FLT128_MSW64(hx,x); 30 SET_FLT128_MSW64(x,hx&0x7fffffffffffffffLL);
|
H A D | finiteq.c | 29 int64_t hx; local 30 GET_FLT128_MSW64(hx,x); 31 return (int)((uint64_t)((hx&0x7fff000000000000LL)
|
H A D | ilogbq.c | 38 int64_t hx,lx; local 41 GET_FLT128_WORDS64(hx,lx,x); 42 hx &= 0x7fffffffffffffffLL; 43 if(hx <= 0x0001000000000000LL) { 44 if((hx|lx)==0) 47 if(hx==0) { 50 for (ix = -16382, hx<<=15; hx>0; hx<<=1) ix -=1; 54 else if (hx< [all...] |
H A D | frexpq.c | 37 uint64_t hx, lx, ix; local 38 GET_FLT128_WORDS64(hx,lx,x); 39 ix = 0x7fffffffffffffffULL&hx; 44 GET_FLT128_MSW64(hx,x); 45 ix = hx&0x7fffffffffffffffULL; 49 hx = (hx&0x8000ffffffffffffULL) | 0x3ffe000000000000ULL; 50 SET_FLT128_MSW64(x,hx);
|
H A D | isinfq.c | 21 int64_t hx,lx; local 22 GET_FLT128_WORDS64(hx,lx,x); 23 lx |= (hx & 0x7fffffffffffffffLL) ^ 0x7fff000000000000LL; 25 return ~(lx >> 63) & (hx >> 62);
|
/netbsd-current/external/gpl3/gcc.old/dist/libquadmath/math/ |
H A D | isnanq.c | 29 int64_t hx,lx; local 30 GET_FLT128_WORDS64(hx,lx,x); 31 hx &= 0x7fffffffffffffffLL; 32 hx |= (uint64_t)(lx|(-lx))>>63; 33 hx = 0x7fff000000000000LL - hx; 34 return (int)((uint64_t)hx>>63);
|
H A D | logbq.c | 31 int64_t lx, hx, ex; local 33 GET_FLT128_WORDS64 (hx, lx, x); 34 hx &= 0x7fffffffffffffffLL; /* high |x| */ 35 if ((hx | lx) == 0) 37 if (hx >= 0x7fff000000000000LL) 39 if ((ex = hx >> 48) == 0) /* IEEE 754 logb */ 44 if (hx == 0) 47 ma = __builtin_clzll (hx);
|
H A D | fabsq.c | 28 uint64_t hx; local 29 GET_FLT128_MSW64(hx,x); 30 SET_FLT128_MSW64(x,hx&0x7fffffffffffffffLL);
|
H A D | finiteq.c | 29 int64_t hx; local 30 GET_FLT128_MSW64(hx,x); 31 return (int)((uint64_t)((hx&0x7fff000000000000LL)
|
H A D | ilogbq.c | 38 int64_t hx,lx; local 41 GET_FLT128_WORDS64(hx,lx,x); 42 hx &= 0x7fffffffffffffffLL; 43 if(hx <= 0x0001000000000000LL) { 44 if((hx|lx)==0) 47 if(hx==0) { 50 for (ix = -16382, hx<<=15; hx>0; hx<<=1) ix -=1; 54 else if (hx< [all...] |
H A D | frexpq.c | 37 uint64_t hx, lx, ix; local 38 GET_FLT128_WORDS64(hx,lx,x); 39 ix = 0x7fffffffffffffffULL&hx; 44 GET_FLT128_MSW64(hx,x); 45 ix = hx&0x7fffffffffffffffULL; 49 hx = (hx&0x8000ffffffffffffULL) | 0x3ffe000000000000ULL; 50 SET_FLT128_MSW64(x,hx);
|