parisc/math-emu/fcnvfxt.c

1 // SPDX-License-Identifier: GPL-2.0-or-later
3  * Linux/PA-RISC Project (http://www.parisc-linux.org/)
5  * Floating-point emulation code
6  *  Copyright (C) 2001 Hewlett-Packard (Paul Bame) <bame@debian.org>
15  *	Single Floating-point to Single Fixed-point /w truncated result
16  *	Single Floating-point to Double Fixed-point /w truncated result
17  *	Double Floating-point to Single Fixed-point /w truncated result
18  *	Double Floating-point to Double Fixed-point /w truncated result
41  *  Convert single floating-point to single fixed-point format
56 	src_exponent = Sgl_exponent(src) - SGL_BIAS;  in sgl_to_sgl_fcnvfxt()
83 		if (Sgl_isone_sign(src))  result = -Sgl_all(temp);  in sgl_to_sgl_fcnvfxt()
106  *  Single Floating-point to Double Fixed-point
120 	src_exponent = Sgl_exponent(src) - SGL_BIAS;  in sgl_to_dbl_fcnvfxt()
180  *  Double Floating-point to Single Fixed-point
194 	src_exponent = Dbl_exponent(srcp1) - DBL_BIAS;  in dbl_to_sgl_fcnvfxt()
222 			result = -Dbl_allp1(tempp1);  in dbl_to_sgl_fcnvfxt()
245  *  Double Floating-point to Double Fixed-point
259 	src_exponent = Dbl_exponent(srcp1) - DBL_BIAS;  in dbl_to_dbl_fcnvfxt()