Home | History | Annotate | Download | only in spmath

Lines Matching refs:srcp1

173 	int dst_exponent, srcp1;
176 	Dint_copyfromptr(srcptr,srcp1,srcp2);
180 	if (srcp1 < 0) {
182 		Dint_negate(srcp1,srcp2);
187 		if (srcp1 == 0 && srcp2 == 0) {
197 	if (srcp1 == 0) {
206 			srcp1 = srcp2 << dst_exponent;
210 			srcp1 = srcp2 >> 1;
226 		Find_ms_one_bit(srcp1,dst_exponent);
229 			Variable_shift_double(srcp1,srcp2,(32-dst_exponent),
230 			 srcp1);
238 		else srcp1 >>= -(dst_exponent);
240 	Sgl_set_mantissa(result, (srcp1 >> (SGL_EXP_LENGTH - 1)));
244 	if (Dint_isinexact_to_sgl(srcp1,srcp2)) {
255 				Sgl_roundnearest_from_dint(srcp1,srcp2,result);
274 	register int srcp1, dst_exponent;
277 	Dint_copyfromptr(srcptr,srcp1,srcp2);
281 	if (srcp1 < 0) {
283 		Dint_negate(srcp1,srcp2);
288 		if (srcp1 == 0 && srcp2 ==0) {
298 	if (srcp1 == 0) {
307 			srcp1 = srcp2 << dst_exponent;
311 			srcp1 = srcp2 >> 1;
326 		Find_ms_one_bit(srcp1,dst_exponent);
329 			Variable_shift_double(srcp1,srcp2,(32-dst_exponent),
330 			 srcp1);
338 		else srcp1 >>= -(dst_exponent);
340 	Dbl_set_mantissap1(resultp1, srcp1 >> (DBL_EXP_LENGTH-1));
341 	Shiftdouble(srcp1,srcp2,DBL_EXP_LENGTH-1,resultp2);