539 #define Dblext_setzero(valA,valB,valC,valD)	\  argument
541     Dextallp3(valC) = 0; Dextallp4(valD) = 0
544 #define Dblext_isnotzero_mantissap3(valC) (Dextallp3(valC)!=0)  argument
549 #define Dblext_iszero(valA,valB,valC,valD) (Dextallp1(valA)==0 && \  argument
550     Dextallp2(valB)==0 && Dextallp3(valC)==0 && Dextallp4(valD)==0)
683 #define Dblext_leftshiftby8(valA,valB,valC,valD) \  argument
685     Shiftdouble(Dextallp2(valB),Dextallp3(valC),24,Dextallp2(valB)); \
686     Shiftdouble(Dextallp3(valC),Dextallp4(valD),24,Dextallp3(valC)); \
688 #define Dblext_leftshiftby4(valA,valB,valC,valD) \  argument
690     Shiftdouble(Dextallp2(valB),Dextallp3(valC),28,Dextallp2(valB)); \
691     Shiftdouble(Dextallp3(valC),Dextallp4(valD),28,Dextallp3(valC)); \
693 #define Dblext_leftshiftby3(valA,valB,valC,valD) \  argument
695     Shiftdouble(Dextallp2(valB),Dextallp3(valC),29,Dextallp2(valB)); \
696     Shiftdouble(Dextallp3(valC),Dextallp4(valD),29,Dextallp3(valC)); \
698 #define Dblext_leftshiftby2(valA,valB,valC,valD) \  argument
700     Shiftdouble(Dextallp2(valB),Dextallp3(valC),30,Dextallp2(valB)); \
701     Shiftdouble(Dextallp3(valC),Dextallp4(valD),30,Dextallp3(valC)); \
703 #define Dblext_leftshiftby1(valA,valB,valC,valD) \  argument
705     Shiftdouble(Dextallp2(valB),Dextallp3(valC),31,Dextallp2(valB)); \
706     Shiftdouble(Dextallp3(valC),Dextallp4(valD),31,Dextallp3(valC)); \