75    Int bexp = ((UInt)e_lsb[9] << 8) | (UInt)e_lsb[8];  in fp_double_from_extended()  local
76    bexp &= 0x7fff;  in fp_double_from_extended()
78    if (bexp == 0)   in fp_double_from_extended()
79       bexp = 0;  /* preserve zeroes */  in fp_double_from_extended()
81    if (bexp == 0x7FFF)   in fp_double_from_extended()
82       bexp = 0x7FF; /* preserve Infs/Nans */  in fp_double_from_extended()
84       bexp -= (16383 - 1023);  in fp_double_from_extended()
85       if (bexp < 0) bexp = 0;  in fp_double_from_extended()
86       if (bexp > 0x7FF) bexp = 0x7FF;  in fp_double_from_extended()
89    d_lsb[6] = (bexp & 0xF) << 4;  in fp_double_from_extended()
90    d_lsb[7] = ((bexp >> 4) & 0x7F) | ((sign & 0x1) << 7);  in fp_double_from_extended()
109    Int bexp = ((UInt)d_lsb[7] << 4) |  in fp_extended_from_double()  local
111    bexp &= 0x7ff;  in fp_extended_from_double()
113    if (bexp == 0)   in fp_extended_from_double()
114       bexp = 0;  /* preserve zeroes */  in fp_extended_from_double()
116    if (bexp == 0x7FF)   in fp_extended_from_double()
117       bexp = 0x7FFF; /* preserve Infs/Nans */  in fp_extended_from_double()
119       bexp += (16383 - 1023);  in fp_extended_from_double()
121    e_lsb[9] = ((bexp >> 8) & 0x7F) | ((sign & 0x1) << 7);  in fp_extended_from_double()
122    e_lsb[8] = bexp & 0xFF;  in fp_extended_from_double()