Sextallp2
Sextallp1(valA) = 0; Sextallp2(valB) = 0
#define Sglext_isnotzero_mantissap2(valB) (Sextallp2(valB)!=0)
#define Sglext_iszero(valA,valB) (Sextallp1(valA)==0 && Sextallp2(valB)==0)
Sextallp2(destb) = Sextallp2(srcb)
Sextallp1(dest1) = Sall(src1); Sextallp2(dest2) = 0
Sextallp2(leftp2) = Sextallp2(leftp2) XOR Sextallp2(rightp2); \
Sextallp2(rightp2) = Sextallp2(leftp2) XOR Sextallp2(rightp2); \
Sextallp2(leftp2) = Sextallp2(leftp2) XOR Sextallp2(rightp2)
sticky = Sextallp2(srcdstB) << 32 - (shiftamt); \
Sextallp2(srcdstB),shiftamt,Sextallp2(srcdstB)); \
Sextallp2(srcdstB); \
sticky = Sextallp2(srcdstB); \
Sextallp2(srcdstB) = Sextallp1(srcdstA) >> shiftamt; \
if( Sextallp2(rightb) > Sextallp2(leftb) ) Sextallp1(lefta)--; \
Sextallp2(resultb) = Sextallp2(leftb) - Sextallp2(rightb); \
if ((Sextallp2(resultb) = Sextallp2(leftb)+Sextallp2(rightb)) < \
Sextallp2(rightb)) \
Shiftdouble(Sextallp1(srcdstA),Sextallp2(srcdstB),1,Sextallp2(srcdstB)); \
Shiftdouble(Sextallp1(valA),Sextallp2(valB),24,Sextallp1(valA)); \
Sextallp2(valB) <<= 8
Shiftdouble(Sextallp1(valA),Sextallp2(valB),28,Sextallp1(valA)); \
Sextallp2(valB) <<= 4
Shiftdouble(Sextallp1(valA),Sextallp2(valB),29,Sextallp1(valA)); \
Sextallp2(valB) <<= 3
Shiftdouble(Sextallp1(valA),Sextallp2(valB),30,Sextallp1(valA)); \
Sextallp2(valB) <<= 2
Shiftdouble(Sextallp1(valA),Sextallp2(valB),31,Sextallp1(valA)); \
Sextallp2(valB) <<= 1
Shiftdouble(Sextallp1(valueA),Sextallp2(valueB),4,Sextallp2(valueB)); \
Shiftdouble(Sextallp1(valueA),Sextallp2(valueB),3,Sextallp2(valueB)); \
Shiftdouble(Sextallp1(valueA),Sextallp2(valueB),1,Sextallp2(valueB)); \
if (exponent == 0 && Sextallp2(opndp2)) { \
sticky = Sextallp2(opndp2) << 31+exponent; \
sticky = Sextallp2(opndp2); \
Sextallp2(opndp2) = Sextallp1(opndp1); \
Sextallp2(opndp2); \
Sextallp2(opndp2) = Sextallp1(opndp1) >> -31-exponent; \
sticky = Sextallp1(opndp1) | Sextallp2(opndp2); \