/netbsd-current/external/gpl3/gcc/dist/libquadmath/math/ |
H A D | isinfq.c | 21 int64_t hx,lx; local 22 GET_FLT128_WORDS64(hx,lx,x); 23 lx |= (hx & 0x7fffffffffffffffLL) ^ 0x7fff000000000000LL; 24 lx |= -lx; 25 return ~(lx >> 63) & (hx >> 62);
|
H A D | isnanq.c | 29 int64_t hx,lx; local 30 GET_FLT128_WORDS64(hx,lx,x); 32 hx |= (uint64_t)(lx|(-lx))>>63;
|
H A D | nextafterq.c | 32 uint64_t lx,ly; local 34 GET_FLT128_WORDS64(hx,lx,x); 39 if(((ix>=0x7fff000000000000LL)&&((ix-0x7fff000000000000LL)|lx)!=0) || /* x is nan */ 43 if((ix|lx)==0) { /* x == 0 */ 52 if(hx>hy||((hx==hy)&&(lx>ly))) { /* x > y, x -= ulp */ 53 if(lx==0) hx--; 54 lx--; 56 lx++; 57 if(lx==0) hx++; 60 if(hy>=0||hx>hy||((hx==hy)&&(lx>l [all...] |
H A D | logbq.c | 31 int64_t lx, hx, ex; local 33 GET_FLT128_WORDS64 (hx, lx, x); 35 if ((hx | lx) == 0) 45 ma = __builtin_clzll (lx) + 64;
|
H A D | fmodq.c | 29 uint64_t lx,ly,lz; local 31 GET_FLT128_WORDS64(hx,lx,x); 42 if((hx<hy)||(lx<ly)) return x; /* |x|<|y| return x */ 43 if(lx==ly) 50 for (ix = -16431, i=lx; i>0; i<<=1) ix -=1; 65 /* set up {hx,lx}, {hy,ly} and align y to x */ 71 hx = (hx<<n)|(lx>>(64-n)); 72 lx <<= n; 74 hx = lx<<(n-64); 75 lx [all...] |
H A D | ilogbq.c | 38 int64_t hx,lx; local 41 GET_FLT128_WORDS64(hx,lx,x); 44 if((hx|lx)==0) 48 for (ix = -16431; lx>0; lx<<=1) ix -=1; 57 if (((hx^0x7fff000000000000LL)|lx) == 0)
|
H A D | frexpq.c | 37 uint64_t hx, lx, ix; local 38 GET_FLT128_WORDS64(hx,lx,x); 41 if(ix>=0x7fff000000000000ULL||((ix|lx)==0)) return x + x;/* 0,inf,nan */
|
/netbsd-current/external/gpl3/gcc.old/dist/libquadmath/math/ |
H A D | isinfq.c | 21 int64_t hx,lx; local 22 GET_FLT128_WORDS64(hx,lx,x); 23 lx |= (hx & 0x7fffffffffffffffLL) ^ 0x7fff000000000000LL; 24 lx |= -lx; 25 return ~(lx >> 63) & (hx >> 62);
|
H A D | isnanq.c | 29 int64_t hx,lx; local 30 GET_FLT128_WORDS64(hx,lx,x); 32 hx |= (uint64_t)(lx|(-lx))>>63;
|
H A D | nextafterq.c | 32 uint64_t lx,ly; local 34 GET_FLT128_WORDS64(hx,lx,x); 39 if(((ix>=0x7fff000000000000LL)&&((ix-0x7fff000000000000LL)|lx)!=0) || /* x is nan */ 43 if((ix|lx)==0) { /* x == 0 */ 52 if(hx>hy||((hx==hy)&&(lx>ly))) { /* x > y, x -= ulp */ 53 if(lx==0) hx--; 54 lx--; 56 lx++; 57 if(lx==0) hx++; 60 if(hy>=0||hx>hy||((hx==hy)&&(lx>l [all...] |
H A D | logbq.c | 31 int64_t lx, hx, ex; local 33 GET_FLT128_WORDS64 (hx, lx, x); 35 if ((hx | lx) == 0) 45 ma = __builtin_clzll (lx) + 64;
|
H A D | fmodq.c | 29 uint64_t lx,ly,lz; local 31 GET_FLT128_WORDS64(hx,lx,x); 42 if((hx<hy)||(lx<ly)) return x; /* |x|<|y| return x */ 43 if(lx==ly) 50 for (ix = -16431, i=lx; i>0; i<<=1) ix -=1; 65 /* set up {hx,lx}, {hy,ly} and align y to x */ 71 hx = (hx<<n)|(lx>>(64-n)); 72 lx <<= n; 74 hx = lx<<(n-64); 75 lx [all...] |
H A D | ilogbq.c | 38 int64_t hx,lx; local 41 GET_FLT128_WORDS64(hx,lx,x); 44 if((hx|lx)==0) 48 for (ix = -16431; lx>0; lx<<=1) ix -=1; 57 if (((hx^0x7fff000000000000LL)|lx) == 0)
|
/netbsd-current/lib/libm/src/ |
H A D | s_isnan.c | 29 int32_t hx,lx; local 30 EXTRACT_WORDS(hx,lx,x); 32 hx |= (u_int32_t)(lx|(-lx))>>31;
|
H A D | s_nextafter.c | 38 u_int32_t lx,ly; local 40 EXTRACT_WORDS(hx,lx,x); 45 if(((ix>=0x7ff00000)&&((ix-0x7ff00000)|lx)!=0) || /* x is nan */ 49 if((ix|lx)==0) { /* x == 0 */ 55 if(hx>hy||((hx==hy)&&(lx>ly))) { /* x > y, x -= ulp */ 56 if(lx==0) hx -= 1; 57 lx -= 1; 59 lx += 1; 60 if(lx==0) hx += 1; 63 if(hy>=0||hx>hy||((hx==hy)&&(lx>l [all...] |
H A D | e_fmod.c | 37 u_int32_t lx,ly,lz; local 39 EXTRACT_WORDS(hx,lx,x); 50 if((hx<hy)||(lx<ly)) return x; /* |x|<|y| return x */ 51 if(lx==ly) 58 for (ix = -1043, i=lx; i>0; i<<=1) ix -=1; 73 /* set up {hx,lx}, {hy,ly} and align y to x */ 79 hx = (hx<<n)|(lx>>(32-n)); 80 lx <<= n; 82 hx = lx<<(n-32); 83 lx [all...] |
H A D | s_isinf.c | 22 int32_t hx,lx; local 23 EXTRACT_WORDS(hx,lx,x); 26 hx |= lx;
|
H A D | s_logb.c | 34 int32_t lx,ix; local 35 EXTRACT_WORDS(ix,lx,x); 37 if((ix|lx)==0) return -1.0/fabs(x);
|
H A D | s_remquo.c | 40 u_int32_t lx,ly,lz,q,sxy; local 42 EXTRACT_WORDS(hx,lx,x); 54 if((hx<hy)||(lx<ly)) { 58 if(lx==ly) { 67 for (ix = -1043, i=lx; i>0; i<<=1) ix -=1; 82 /* set up {hx,lx}, {hy,ly} and align y to x */ 88 hx = (hx<<n)|(lx>>(32-n)); 89 lx <<= n; 91 hx = lx<<(n-32); 92 lx [all...] |
H A D | s_nexttoward.c | 51 uint32_t lx; local 53 EXTRACT_WORDS(hx, lx, x); 57 if (((ix >= 0x7ff00000) && ((ix - 0x7ff00000) | lx) != 0) || 75 if (lx == 0) hx -= 1; 76 lx -= 1; 78 lx += 1; 79 if (lx == 0) hx += 1; 86 INSERT_WORDS(y, hx, lx); 90 INSERT_WORDS(x, hx, lx);
|
H A D | s_ilogb.c | 39 int32_t hx, lx, ix; local 44 GET_LOW_WORD(lx, x); 45 if ((hx | lx) == 0) { 50 for (ix = -1043; lx > 0; lx <<= 1) ix -= 1;
|
H A D | e_fmodl.c | 79 manl_t lx,ly,lz; local 118 /* set up {hx,lx}, {hy,ly} and align y to x */ 121 lx = ux.extu_fracl; 128 hz=hx-hy;lz=lx-ly; if(lx<ly) hz -= 1; 129 if(hz<0){hx = hx+hx+(lx>>MANL_SHIFT); lx = lx+lx;} 133 hx = hz+hz+(lz>>MANL_SHIFT); lx [all...] |
H A D | s_remquol.c | 83 manl_t lx,ly,lz; local 129 /* set up {hx,lx}, {hy,ly} and align y to x */ 132 lx = ux.extu_fracl; 139 hz=hx-hy;lz=lx-ly; if(lx<ly) hz -= 1; 140 if(hz<0){hx = hx+hx+(lx>>MANL_SHIFT); lx = lx+lx;} 141 else {hx = hz+hz+(lz>>MANL_SHIFT); lx [all...] |
H A D | s_frexp.c | 41 int32_t hx, ix, lx; local 42 EXTRACT_WORDS(hx,lx,x); 45 if(ix>=0x7ff00000||((ix|lx)==0)) return x; /* 0,inf,nan */
|
/netbsd-current/lib/libm/ld80/ |
H A D | s_cospil.c | 49 uint64_t lx; local 53 EXTRACT_LDBL80_WORDS(hx, lx, x); 55 INSERT_LDBL80_WORDS(ax, ix, lx); 70 else if (lx < 0xc000000000000000ull) { /* |x| < 0.75 */ 80 FFLOORL80(x, j0, ix, lx); /* Integer part of ax. */ 82 EXTRACT_LDBL80_WORDS(ix, lx, ax); 91 if (lx < 0xc000000000000000ull) { /* |x| < 0.75 */ 116 RETURNI(ix >= 0x403f ? 1 : ((lx & 1) ? -1 : 1));
|