SNG_MASK
return (sign | SNG_EXP(SNG_EXP_INFNAN - 1) | SNG_MASK);
return (sign | SNG_EXP(exp) | (fp->fp_mant[3] & SNG_MASK));