Lines Matching refs:srcp1
134 register unsigned int srcp1, srcp2, result; in dbl_to_sgl_fcnvff() local
140 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvff()
141 src_exponent = Dbl_exponent(srcp1); in dbl_to_sgl_fcnvff()
142 Sgl_all(result) = Dbl_allp1(srcp1); /* set sign of result */ in dbl_to_sgl_fcnvff()
150 if (Dbl_iszero_mantissa(srcp1,srcp2)) { in dbl_to_sgl_fcnvff()
161 if (Dbl_isone_signaling(srcp1)) { in dbl_to_sgl_fcnvff()
167 Dbl_set_quiet(srcp1); in dbl_to_sgl_fcnvff()
174 Sgl_set_mantissa(result,Dallp1(srcp1)<<3 | Dallp2(srcp2)>>29); in dbl_to_sgl_fcnvff()
184 Dbl_to_sgl_mantissa(srcp1,srcp2,dest_mantissa,inexact,guardbit, in dbl_to_sgl_fcnvff()
188 if (Dbl_iszero_exponentmantissa(srcp1,srcp2)){ in dbl_to_sgl_fcnvff()
194 Dbl_to_sgl_mantissa(srcp1,srcp2,dest_mantissa,inexact, in dbl_to_sgl_fcnvff()
201 Dbl_to_sgl_denormalized(srcp1,srcp2,dest_exponent, in dbl_to_sgl_fcnvff()