Lines Matching +full:point +full:- +full:to +full:- +full:point
2 * Linux/PA-RISC Project (http://www.parisc-linux.org/)
4 * Floating-point emulation code
5 * Copyright (C) 2001 Hewlett-Packard (Paul Bame) <bame@debian.org>
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
28 * Single Fixed-point to Single Floating-point
29 * Single Fixed-point to Double Floating-point
30 * Double Fixed-point to Single Floating-point
31 * Double Fixed-point to Double Floating-point
54 * Convert single fixed-point to single floating-point format
91 * between -1 and 30. in sgl_to_sgl_fcnvxf()
97 Sgl_set_mantissa(result, src >> (SGL_EXP_LENGTH-1)); in sgl_to_sgl_fcnvxf()
98 Sgl_set_exponent(result, 30+SGL_BIAS - dst_exponent); in sgl_to_sgl_fcnvxf()
125 * Single Fixed-point to Double Floating-point
162 * between -1 and 30. in sgl_to_dbl_fcnvxf()
168 Dbl_set_mantissap1(resultp1, src >> DBL_EXP_LENGTH - 1); in sgl_to_dbl_fcnvxf()
169 Dbl_set_mantissap2(resultp2, src << (33-DBL_EXP_LENGTH)); in sgl_to_dbl_fcnvxf()
170 Dbl_set_exponent(resultp1, (30+DBL_BIAS) - dst_exponent); in sgl_to_dbl_fcnvxf()
176 * Double Fixed-point to Single Floating-point
214 * between -1 and 30. in dbl_to_sgl_fcnvxf()
227 * since msb set is in second word, need to in dbl_to_sgl_fcnvxf()
236 * between -1 and 30. in dbl_to_sgl_fcnvxf()
242 Variable_shift_double(srcp1,srcp2,(32-dst_exponent), in dbl_to_sgl_fcnvxf()
247 * If dst_exponent = 0, we don't need to shift anything. in dbl_to_sgl_fcnvxf()
248 * If dst_exponent = -1, src = - 2**63 so we won't need to in dbl_to_sgl_fcnvxf()
251 else srcp1 >>= -(dst_exponent); in dbl_to_sgl_fcnvxf()
253 Sgl_set_mantissa(result, srcp1 >> SGL_EXP_LENGTH - 1); in dbl_to_sgl_fcnvxf()
254 Sgl_set_exponent(result, (62+SGL_BIAS) - dst_exponent); in dbl_to_sgl_fcnvxf()
281 * Double Fixed-point to Double Floating-point
319 * between -1 and 30. in dbl_to_dbl_fcnvxf()
332 * since msb set is in second word, need to in dbl_to_dbl_fcnvxf()
341 * between -1 and 30. in dbl_to_dbl_fcnvxf()
346 Variable_shift_double(srcp1,srcp2,(32-dst_exponent), in dbl_to_dbl_fcnvxf()
351 * If dst_exponent = 0, we don't need to shift anything. in dbl_to_dbl_fcnvxf()
352 * If dst_exponent = -1, src = - 2**63 so we won't need to in dbl_to_dbl_fcnvxf()
355 else srcp1 >>= -(dst_exponent); in dbl_to_dbl_fcnvxf()
357 Dbl_set_mantissap1(resultp1, srcp1 >> (DBL_EXP_LENGTH-1)); in dbl_to_dbl_fcnvxf()
358 Shiftdouble(srcp1,srcp2,DBL_EXP_LENGTH-1,resultp2); in dbl_to_dbl_fcnvxf()
359 Dbl_set_exponent(resultp1, (62+DBL_BIAS) - dst_exponent); in dbl_to_dbl_fcnvxf()