Lines Matching refs:Dallp1
26 #define Dbl_firstword(value) Dallp1(value)
37 #define Dbl_allp1(object) Dallp1(object)
43 Dallp1(src1dst) = (Dallp1(src2)|~((unsigned int)1<<31)) & Dallp1(src1dst)
45 Dallp1(src1dst) = (Dallp1(src2)&((unsigned int)1<<31)) | Dallp1(src1dst)
51 #define Dbl_clear_sign(srcdst) Dallp1(srcdst) &= ~((unsigned int)1<<31)
53 Dallp1(srcdst) &= Dmantissap1((unsigned int)-1)
66 Dallp2(srcdstB) = Dallp1(srcdstA) >> (varamount-32); \
67 Dallp1(srcdstA)=0; \
70 Variable_shift_double(Dallp1(srcdstA), Dallp2(srcdstB), \
72 Dallp1(srcdstA) >>= varamount; \
78 Dallp1(srcdstA) &= ((unsigned int)1<<31); /* clear expmant field */ \
89 Dallp1(srcdstA) = Dallp2(srcdstB) << (varamount-32); \
94 Dallp1(srcdstA) = (Dallp1(srcdstA) << (varamount)) | \
100 Shiftdouble(Dallp1(lefta), Dallp2(leftb), 31, Dallp1(resulta)); \
108 Shiftdouble(Dallp1(srcdstA),Dallp2(srcdstB),1,Dallp2(srcdstB));\
109 Dallp1(srcdstA) = (int)Dallp1(srcdstA) >> 1
118 if( (Dallp2(dbl_valueB) += 1) == 0 ) Dallp1(dbl_valueA) += 1
123 if( Dallp2(dbl_valueB) == 0 ) Dallp1(dbl_valueA) -= 1; \
133 (Dallp1(dbl_valueA) || Dallp2(dbl_valueB))
144 #define Dbl_iszero(dbl_valueA,dbl_valueB) (Dallp1(dbl_valueA)==0 && \
146 #define Dbl_iszero_allp1(dbl_value) (Dallp1(dbl_value)==0)
175 (Dallp1(dbl_op1a) < Dallp1(dbl_op2a) || \
176 (Dallp1(dbl_op1a) == Dallp1(dbl_op2a) && \
179 (Dallp1(dbl_op1a) > Dallp1(dbl_op2a) || \
180 (Dallp1(dbl_op1a) == Dallp1(dbl_op2a) && \
183 (Dallp1(dbl_op1a) > Dallp1(dbl_op2a) || \
184 (Dallp1(dbl_op1a) == Dallp1(dbl_op2a) && \
187 (Dallp1(dbl_op1a) < Dallp1(dbl_op2a) || \
188 (Dallp1(dbl_op1a) == Dallp1(dbl_op2a) && \
191 ((Dallp1(dbl_op1a) == Dallp1(dbl_op2a)) && \
195 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),24,Dallp1(dbl_valueA)); \
198 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),25,Dallp1(dbl_valueA)); \
201 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),28,Dallp1(dbl_valueA)); \
204 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),29,Dallp1(dbl_valueA)); \
207 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),30,Dallp1(dbl_valueA)); \
210 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),31,Dallp1(dbl_valueA)); \
214 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),8,Dallp2(dbl_valueB)); \
215 Dallp1(dbl_valueA) >>= 8
217 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),4,Dallp2(dbl_valueB)); \
218 Dallp1(dbl_valueA) >>= 4
220 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),2,Dallp2(dbl_valueB)); \
221 Dallp1(dbl_valueA) >>= 2
223 Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),1,Dallp2(dbl_valueB)); \
224 Dallp1(dbl_valueA) >>= 1
263 Dallp1(desta) = src->wd0; \
266 dest->wd0 = Dallp1(srca); \
277 Dallp1(dbl_valueA) \
281 Dallp1(dbl_valueA) = ((unsigned int)1<<31) | \
285 Dallp1(dbl_valueA) = ((unsigned int)sign << 31) | \
294 #define Dbl_setzero_sign(dbl_value) Dallp1(dbl_value) &= 0x7fffffff
296 Dallp1(dbl_value) &= 0x800fffff
298 Dallp1(dbl_valueA) &= 0xfff00000; \
300 #define Dbl_setzero_mantissap1(dbl_value) Dallp1(dbl_value) &= 0xfff00000
303 Dallp1(dbl_valueA) &= 0x80000000; \
306 Dallp1(dbl_valueA) &= 0x80000000
308 Dallp1(dbl_valueA) = 0; Dallp2(dbl_valueB) = 0
309 #define Dbl_setzerop1(dbl_value) Dallp1(dbl_value) = 0
312 Dallp1(dbl_value) = (unsigned int)1 << 31; Dallp2(dbl_value) = 0
313 #define Dbl_setnegativezerop1(dbl_value) Dallp1(dbl_value) = (unsigned int)1<<31
322 Dallp1(dbl_valueA) = ((DBL_EMAX+DBL_BIAS) << (32-(1+DBL_EXP_LENGTH))) \
326 Dallp1(dbl_valueA) = ((DBL_EMAX+DBL_BIAS) << (32-(1+DBL_EXP_LENGTH))) \
337 Dallp1(dbl_valueA) = ((1<<DBL_EXP_LENGTH) | DBL_INFINITY_EXPONENT) \
341 Dallp1(dbl_valueA) = ((unsigned int)sign << 31) | \
357 Variable_shift_double(Dallp1(srcdstA),Dallp2(srcdstB), \
362 Dallp2(srcdstB) = Dallp1(srcdstA) >> (shift - 32); \
366 Extall(extent) = Dallp1(srcdstA); \
370 Dallp1(srcdstA) = 0; \
378 Variable_shift_double(Dallp1(srcdstA),Dallp2(srcdstB),shift, \
380 Dallp1(srcdstA) >>= shift; \
391 Dallp2(srcdstB) = (Dallp1(srcdstA) << 32 - (shift)) | \
393 Dallp1(srcdstA) = Dallp1(srcdstA) >> shift
401 if( Dallp2(rightb) > Dallp2(leftb) ) Dallp1(lefta)--; \
403 Dallp1(resulta) = Dallp1(lefta) - Dallp1(righta)
411 if((Dallp2(resultb)--) == 0) Dallp1(resulta)--; \
417 Dallp1(resulta) = Dallp1(lefta) + Dallp1(righta); \
419 Dallp1(resulta)++
422 result = Dallp1(left) XOR Dallp1(right)
425 Dallp1(result) = left XOR Dallp1(right)
434 Dallp1(desta) = ((DBL_EMAX+DBL_BIAS)+1)<< (32-(1+DBL_EXP_LENGTH)) \
438 Dallp1(desta) = ((DBL_EMAX+DBL_BIAS)+1)<< (32-(1+DBL_EXP_LENGTH)) \
462 if ((src1dstB) + (src2B) < (src1dstB)) Dallp1(src1dstA)++; \
463 Dallp1(src1dstA) += (src2A); \
472 if ((src1dstB) < (src2B)) Dallp1(src1dstA)--; \
473 Dallp1(src1dstA) -= (src2A); \
510 Dallp1(opndp1) >>= 1-exponent; \
513 Dallp2(opndp2) = Dallp1(opndp1); \
518 guard = (Dallp1(opndp1) >> -32-exponent) & 1; \
520 else sticky |= (Dallp2(opndp2) | Dallp1(opndp1) << 64+exponent); \
521 Dallp2(opndp2) = Dallp1(opndp1) >> -31-exponent; \
528 sticky |= (Dallp1(opndp1) | Dallp2(opndp2)); \
732 Dextallp1(dest1) = Dallp1(src1); Dextallp2(dest2) = Dallp2(src2); \