DBL_P
(exponent < (DBL_P-33) ? \
(exponent < (DBL_P-1) ? Dallp2(dbl_valueB) << (exponent + (33-DBL_P)) : \
((exponent < (DBL_P - 33) ? \
Dallp2(dbl_valueB) >> ((DBL_P - 2) - exponent)) & 1)
(exponent < (DBL_P-34) ? \
(exponent<(DBL_P-2) ? (Dallp2(dbl_valueB) << (exponent + (34-DBL_P))) : \
if (exponent >= (1-DBL_P)) { \
for (count=1; count <= DBL_P && (opnd1p1 || opnd1p2); count++) {
if (count <= DBL_P) {
Dbl_leftshift(opnd3p1,opnd3p2,(DBL_P-count));
for (count=1;count<=DBL_P;count+=4) {
if (dest_exponent >= (1 - DBL_P)) {
Dbl_allp1(newbitp1) = 1 << (DBL_P - 32);
if ((src_exponent -= DBL_BIAS) >= DBL_P - 1) {
Dbl_rightshift(resultp1,resultp2,(DBL_P-1) - (src_exponent));
Dbl_leftshift(resultp1,resultp2,(DBL_P-1) - (src_exponent));