parisc/math-emu/dfmpy.c

44 	register unsigned int opnd3p1, opnd3p2, resultp1, resultp2;
198 	Dbl_setzero(opnd3p1,opnd3p2);
204 		stickybit |= Dlow4p2(opnd3p2);
205 		Dbl_rightshiftby4(opnd3p1,opnd3p2);
208                         Twoword_add(opnd3p1, opnd3p2, opnd2p1<<3 | opnd2p2>>29,
212                         Twoword_add(opnd3p1, opnd3p2, opnd2p1<<2 | opnd2p2>>30,
216                         Twoword_add(opnd3p1, opnd3p2, opnd2p1<<1 | opnd2p2>>31,
220                         Twoword_add(opnd3p1, opnd3p2, opnd2p1, opnd2p2);
225 		Dbl_leftshiftby1(opnd3p1,opnd3p2);
233 		Dbl_leftshiftby1(opnd3p1,opnd3p2);
239 	stickybit |= Dallp2(opnd3p2) << 25;
240 	guardbit = (Dallp2(opnd3p2) << 24) >> 31;
244 	Dbl_rightshiftby8(opnd3p1,opnd3p2);
254 					Dbl_increment(opnd3p1,opnd3p2);
258 					Dbl_increment(opnd3p1,opnd3p2);
262 			   	if (stickybit || Dbl_isone_lowmantissap2(opnd3p2))
263 			      	Dbl_increment(opnd3p1,opnd3p2);
268 	Dbl_set_mantissa(resultp1,resultp2,opnd3p1,opnd3p2);
316 					Dbl_increment(opnd3p1,opnd3p2);
319 					Dbl_decrement(opnd3p1,opnd3p2);
324 					Dbl_increment(opnd3p1,opnd3p2);
327 					Dbl_decrement(opnd3p1,opnd3p2);
332 				    Dbl_isone_lowmantissap2(opnd3p2))) {
333 				      	Dbl_increment(opnd3p1,opnd3p2);
336 					Dbl_decrement(opnd3p1,opnd3p2);
346 		Dbl_denormalize(opnd3p1,opnd3p2,dest_exponent,guardbit,
354 					Dbl_increment(opnd3p1,opnd3p2);
359 					Dbl_increment(opnd3p1,opnd3p2);
364 				    Dbl_isone_lowmantissap2(opnd3p2))) {
365 			      		Dbl_increment(opnd3p1,opnd3p2);
371 		Dbl_set_exponentmantissa(resultp1,resultp2,opnd3p1,opnd3p2);