Sextallp1
Sextallp1(valA) = 0; Sextallp2(valB) = 0
#define Sglext_iszero(valA,valB) (Sextallp1(valA)==0 && Sextallp2(valB)==0)
Sextallp1(desta) = Sextallp1(srca); \
Sextallp1(dest1) = Sall(src1); Sextallp2(dest2) = 0
Variable_shift_double(Sextallp1(srcdstA), \
Sextallp1(srcdstA) >>= shiftamt; \
sticky = (Sextallp1(srcdstA) << 32 - (shiftamt)) | \
Sextallp2(srcdstB) = Sextallp1(srcdstA) >> shiftamt; \
Sextallp1(srcdstA) = 0; \
if( Sextallp2(rightb) > Sextallp2(leftb) ) Sextallp1(lefta)--; \
Sextallp1(resulta) = Sextallp1(lefta) - Sextallp1(righta)
Sextallp1(resulta) = Sextallp1(lefta)+Sextallp1(righta)+1; \
else Sextallp1(resulta) = Sextallp1(lefta)+Sextallp1(righta)
Shiftdouble(Sextallp1(srcdstA),Sextallp2(srcdstB),1,Sextallp2(srcdstB)); \
Sextallp1(srcdstA) = (int)Sextallp1(srcdstA) >> 1
Shiftdouble(Sextallp1(valA),Sextallp2(valB),24,Sextallp1(valA)); \
Shiftdouble(Sextallp1(valA),Sextallp2(valB),28,Sextallp1(valA)); \
Shiftdouble(Sextallp1(valA),Sextallp2(valB),29,Sextallp1(valA)); \
Shiftdouble(Sextallp1(valA),Sextallp2(valB),30,Sextallp1(valA)); \
Shiftdouble(Sextallp1(valA),Sextallp2(valB),31,Sextallp1(valA)); \
Shiftdouble(Sextallp1(valueA),Sextallp2(valueB),4,Sextallp2(valueB)); \
Sextallp1(valueA) >>= 4
Shiftdouble(Sextallp1(valueA),Sextallp2(valueB),3,Sextallp2(valueB)); \
Sextallp1(valueA) >>= 3
Shiftdouble(Sextallp1(valueA),Sextallp2(valueB),1,Sextallp2(valueB)); \
Sextallp1(valueA) >>= 1
Sextallp1(opndp1) >>= 1-exponent; \
Sextallp2(opndp2) = Sextallp1(opndp1); \
Sextallp1(opndp1) = 0; \
sticky = (Sextallp1(opndp1) << 31+exponent) | \
Sextallp2(opndp2) = Sextallp1(opndp1) >> -31-exponent; \
Sextallp1(opndp1) = 0; \
sticky = Sextallp1(opndp1) | Sextallp2(opndp2); \