Lines Matching refs:srcp1
153 unsigned int srcp1, srcp2, result = 0; in dbl_to_sgl_fcnvuf() local
155 Duint_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvuf()
158 if (srcp1 == 0 && srcp2 == 0) { in dbl_to_sgl_fcnvuf()
167 if (srcp1 == 0) { in dbl_to_sgl_fcnvuf()
175 srcp1 = srcp2 << dst_exponent+1; in dbl_to_sgl_fcnvuf()
190 Find_ms_one_bit(srcp1,dst_exponent); in dbl_to_sgl_fcnvuf()
193 Variable_shift_double(srcp1,srcp2,(31-dst_exponent), in dbl_to_sgl_fcnvuf()
194 srcp1); in dbl_to_sgl_fcnvuf()
198 Sgl_set_mantissa(result, srcp1 >> SGL_EXP_LENGTH); in dbl_to_sgl_fcnvuf()
202 if (Duint_isinexact_to_sgl(srcp1,srcp2)) { in dbl_to_sgl_fcnvuf()
210 Sgl_roundnearest_from_duint(srcp1,srcp2,result); in dbl_to_sgl_fcnvuf()
235 register unsigned int srcp1, srcp2, resultp1 = 0, resultp2 = 0; in dbl_to_dbl_fcnvuf() local
237 Duint_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_dbl_fcnvuf()
240 if (srcp1 == 0 && srcp2 ==0) { in dbl_to_dbl_fcnvuf()
249 if (srcp1 == 0) { in dbl_to_dbl_fcnvuf()
257 srcp1 = srcp2 << dst_exponent+1; in dbl_to_dbl_fcnvuf()
271 Find_ms_one_bit(srcp1,dst_exponent); in dbl_to_dbl_fcnvuf()
274 Variable_shift_double(srcp1,srcp2,(31-dst_exponent), in dbl_to_dbl_fcnvuf()
275 srcp1); in dbl_to_dbl_fcnvuf()
279 Dbl_set_mantissap1(resultp1, srcp1 >> DBL_EXP_LENGTH); in dbl_to_dbl_fcnvuf()
280 Shiftdouble(srcp1,srcp2,DBL_EXP_LENGTH,resultp2); in dbl_to_dbl_fcnvuf()