178 #define Dbl_isinexact_to_fix(dbl_valueA,dbl_valueB,exponent)		\  argument
180      Dallp2(dbl_valueB) || Dallp1(dbl_valueA) << (DBL_EXP_LENGTH+1+exponent) : \
184 #define Dbl_isoverflow_to_int(exponent,dbl_valueA,dbl_valueB)		\  argument
185     ((exponent > SGL_FX_MAX_EXP + 1) || Dsign(dbl_valueA)==0 ||		\
186      Dmantissap1(dbl_valueA)!=0 || (Dallp2(dbl_valueB)>>21)!=0 ) 
188 #define Dbl_isone_roundbit(dbl_valueA,dbl_valueB,exponent)              \  argument
190       Dallp1(dbl_valueA) >> ((30 - DBL_EXP_LENGTH) - exponent) :	\
193 #define Dbl_isone_stickybit(dbl_valueA,dbl_valueB,exponent)		\  argument
195      (Dallp2(dbl_valueB) || Dallp1(dbl_valueA)<<(DBL_EXP_LENGTH+2+exponent)) : \
206 #define Int_from_dbl_mantissa(dbl_valueA,dbl_valueB,exponent)	\  argument
207     Shiftdouble(Dallp1(dbl_valueA),Dallp2(dbl_valueB),22,Dallp1(dbl_valueA)); \
208     if (exponent < 31) Dallp1(dbl_valueA) >>= 30 - exponent;	\
209     else Dallp1(dbl_valueA) <<= 1
228 #define Dint_from_dbl_mantissa(dbl_valueA,dbl_valueB,exponent,destA,destB) \  argument
232     	    Dintp2(destB) = Dallp1(dbl_valueA) >> 20-exponent;		\
233     	else Variable_shift_double(Dallp1(dbl_valueA),Dallp2(dbl_valueB), \
238     	    Dintp1(destA) = Dallp1(dbl_valueA) >> 52-exponent;		\
240 	    else Variable_shift_double(Dallp1(dbl_valueA),Dallp2(dbl_valueB), \
244     	    Variable_shift_double(Dallp1(dbl_valueA),Dallp2(dbl_valueB), \
359 #define Dbl_isinexact_to_unsigned(dbl_valueA,dbl_valueB,exponent) \  argument
360     Dbl_isinexact_to_fix(dbl_valueA,dbl_valueB,exponent)
362 #define Duint_from_dbl_mantissa(dbl_valueA,dbl_valueB,exponent,destA,destB) \  argument
363     Dint_from_dbl_mantissa(dbl_valueA,dbl_valueB,exponent,destA,destB)