Lines Matching refs:Dallp1
50 #define Dbl_firstword(value) Dallp1(value)
61 #define Dbl_allp1(object) Dallp1(object)
67 Dallp1(src1dst) = (Dallp1(src2)|~(1<<31)) & Dallp1(src1dst)
69 Dallp1(src1dst) = (Dallp1(src2)&(1<<31)) | Dallp1(src1dst)
75 #define Dbl_clear_sign(srcdst) Dallp1(srcdst) &= ~(1<<31)
77 Dallp1(srcdst) &= Dmantissap1((unsigned)-1)
90 Dallp2(srcdstB) = Dallp1(srcdstA) >> (varamount-32); \
91 Dallp1(srcdstA)=0; \
94 Variable_shift_double(Dallp1(srcdstA), Dallp2(srcdstB), \
96 Dallp1(srcdstA) >>= varamount; \
102 Dallp1(srcdstA) &= (1<<31); /* clear exponentmantissa field */ \
113 Dallp1(srcdstA) = Dallp2(srcdstB) << (varamount-32); \
118 Dallp1(srcdstA) = (Dallp1(srcdstA) << (varamount)) | \
124 Shiftdouble(Dallp1(lefta), Dallp2(leftb), 31, Dallp1(resulta)); \
132 Shiftdouble(Dallp1(srcdstA),Dallp2(srcdstB),1,Dallp2(srcdstB));\
133 Dallp1(srcdstA) = (int)Dallp1(srcdstA) >> 1
142 if( (Dallp2(dbl_valueB) += 1) == 0 ) Dallp1(dbl_valueA) += 1
147 if( Dallp2(dbl_valueB) == 0 ) Dallp1(dbl_valueA) -= 1; \
157 (Dallp1(dbl_valueA) || Dallp2(dbl_valueB))
168 #define Dbl_iszero(dbl_valueA,dbl_valueB) (Dallp1(dbl_valueA)==0 && \
170 #define Dbl_iszero_allp1(dbl_value) (Dallp1(dbl_value)==0)
199 (Dallp1(dbl_op1a) < Dallp1(dbl_op2a) || \
200 (Dallp1(dbl_op1a) == Dallp1(dbl_op2a) && \
203 (Dallp1(dbl_op1a) > Dallp1(dbl_op2a) || \
204 (Dallp1(dbl_op1a) == Dallp1(dbl_op2a) && \
207 (Dallp1(dbl_op1a) > Dallp1(dbl_op2a) || \
208 (Dallp1(dbl_op1a) == Dallp1(dbl_op2a) && \
211 (Dallp1(dbl_op1a) < Dallp1(dbl_op2a) || \
212 (Dallp1(dbl_op1a) == Dallp1(dbl_op2a) && \
215 ((Dallp1(dbl_op1a) == Dallp1(dbl_op2a)) && \
219 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),24,Dallp1(dbl_valueA)); \
222 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),25,Dallp1(dbl_valueA)); \
225 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),28,Dallp1(dbl_valueA)); \
228 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),29,Dallp1(dbl_valueA)); \
231 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),30,Dallp1(dbl_valueA)); \
234 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),31,Dallp1(dbl_valueA)); \
238 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),8,Dallp2(dbl_valueB)); \
239 Dallp1(dbl_valueA) >>= 8
241 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),4,Dallp2(dbl_valueB)); \
242 Dallp1(dbl_valueA) >>= 4
244 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),2,Dallp2(dbl_valueB)); \
245 Dallp1(dbl_valueA) >>= 2
247 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),1,Dallp2(dbl_valueB)); \
248 Dallp1(dbl_valueA) >>= 1
287 Dallp1(desta) = src->wd0; \
290 dest->wd0 = Dallp1(srca); \
301 Dallp1(dbl_valueA) \
305 Dallp1(dbl_valueA) = (1<<31) | \
309 Dallp1(dbl_valueA) = (sign << 31) | \
318 #define Dbl_setzero_sign(dbl_value) Dallp1(dbl_value) &= 0x7fffffff
320 Dallp1(dbl_value) &= 0x800fffff
322 Dallp1(dbl_valueA) &= 0xfff00000; \
324 #define Dbl_setzero_mantissap1(dbl_value) Dallp1(dbl_value) &= 0xfff00000
327 Dallp1(dbl_valueA) &= 0x80000000; \
330 Dallp1(dbl_valueA) &= 0x80000000
332 Dallp1(dbl_valueA) = 0; Dallp2(dbl_valueB) = 0
333 #define Dbl_setzerop1(dbl_value) Dallp1(dbl_value) = 0
336 Dallp1(dbl_value) = 1 << 31; Dallp2(dbl_value) = 0
337 #define Dbl_setnegativezerop1(dbl_value) Dallp1(dbl_value) = 1 << 31
346 Dallp1(dbl_valueA) = ((DBL_EMAX+DBL_BIAS) << (32-(1+DBL_EXP_LENGTH))) \
350 Dallp1(dbl_valueA) = ((DBL_EMAX+DBL_BIAS) << (32-(1+DBL_EXP_LENGTH))) \
360 Dallp1(dbl_valueA) = ((1<<DBL_EXP_LENGTH) | DBL_INFINITY_EXPONENT) \
364 Dallp1(dbl_valueA) = (sign << 31) | \
380 Variable_shift_double(Dallp1(srcdstA),Dallp2(srcdstB), \
385 Dallp2(srcdstB) = Dallp1(srcdstA) >> (shift - 32); \
389 Extall(extent) = Dallp1(srcdstA); \
393 Dallp1(srcdstA) = 0; \
401 Variable_shift_double(Dallp1(srcdstA),Dallp2(srcdstB),shift, \
403 Dallp1(srcdstA) >>= shift; \
414 Dallp2(srcdstB) = (Dallp1(srcdstA) << (32 - (shift))) | \
416 Dallp1(srcdstA) = Dallp1(srcdstA) >> shift
424 if( Dallp2(rightb) > Dallp2(leftb) ) Dallp1(lefta)--; \
426 Dallp1(resulta) = Dallp1(lefta) - Dallp1(righta)
434 if((Dallp2(resultb)--) == 0) Dallp1(resulta)--; \
440 Dallp1(resulta) = Dallp1(lefta) + Dallp1(righta); \
442 Dallp1(resulta)++
445 result = Dallp1(left) XOR Dallp1(right)
448 Dallp1(result) = left XOR Dallp1(right)
457 Dallp1(desta) = ((DBL_EMAX+DBL_BIAS)+1)<< (32-(1+DBL_EXP_LENGTH)) \
461 Dallp1(desta) = ((DBL_EMAX+DBL_BIAS)+1)<< (32-(1+DBL_EXP_LENGTH)) \
485 if ((src1dstB) + (src2B) < (src1dstB)) Dallp1(src1dstA)++; \
486 Dallp1(src1dstA) += (src2A); \
495 if ((src1dstB) < (src2B)) Dallp1(src1dstA)--; \
496 Dallp1(src1dstA) -= (src2A); \
533 Dallp1(opndp1) >>= 1-exponent; \
536 Dallp2(opndp2) = Dallp1(opndp1); \
541 guard = (Dallp1(opndp1) >> (-32-(exponent))) & 1; \
543 else sticky |= (Dallp2(opndp2) | Dallp1(opndp1) << (64+(exponent))); \
544 Dallp2(opndp2) = Dallp1(opndp1) >> (-31-(exponent)); \
551 sticky |= (Dallp1(opndp1) | Dallp2(opndp2)); \
Indexes created Thu Oct 23 22:10:10 GMT 2025