539 #define Dblext_setzero(valA,valB,valC,valD)	\  argument
541     Dextallp3(valC) = 0; Dextallp4(valD) = 0
545 #define Dblext_isnotzero_mantissap4(valD) (Dextallp3(valD)!=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
686     Shiftdouble(Dextallp3(valC),Dextallp4(valD),24,Dextallp3(valC)); \
687     Dextallp4(valD) <<= 8
688 #define Dblext_leftshiftby4(valA,valB,valC,valD) \  argument
691     Shiftdouble(Dextallp3(valC),Dextallp4(valD),28,Dextallp3(valC)); \
692     Dextallp4(valD) <<= 4
693 #define Dblext_leftshiftby3(valA,valB,valC,valD) \  argument
696     Shiftdouble(Dextallp3(valC),Dextallp4(valD),29,Dextallp3(valC)); \
697     Dextallp4(valD) <<= 3
698 #define Dblext_leftshiftby2(valA,valB,valC,valD) \  argument
701     Shiftdouble(Dextallp3(valC),Dextallp4(valD),30,Dextallp3(valC)); \
702     Dextallp4(valD) <<= 2
703 #define Dblext_leftshiftby1(valA,valB,valC,valD) \  argument
706     Shiftdouble(Dextallp3(valC),Dextallp4(valD),31,Dextallp3(valC)); \
707     Dextallp4(valD) <<= 1