DBL_EXP_INFNAN
exp = DBL_EXP_INFNAN;
sign |= DBL_EXP(DBL_EXP_INFNAN);
if (exp >= DBL_EXP_INFNAN) {
return (sign | DBL_EXP(DBL_EXP_INFNAN) | 0);
return (sign | DBL_EXP(DBL_EXP_INFNAN) | DBL_MASK);
if (p->dbl_exp == DBL_EXP_INFNAN) {
case DBL_EXP_INFNAN: /* Inf or NaN; value of *ex is unspecified */
return (p->dbl_exp != DBL_EXP_INFNAN);
return (p->dbl_exp == DBL_EXP_INFNAN &&
return (p->dbl_exp == DBL_EXP_INFNAN &&
return (p->dbl_exp != 0 && p->dbl_exp != DBL_EXP_INFNAN);
if (u.s.dbl_exp == DBL_EXP_INFNAN) {
exp = DBL_EXP_INFNAN;
sign |= DBL_EXP(DBL_EXP_INFNAN);
if (exp >= DBL_EXP_INFNAN) {
return (sign | DBL_EXP(DBL_EXP_INFNAN) | 0);
return (sign | DBL_EXP(DBL_EXP_INFNAN) | DBL_MASK);