44     register unsigned int resultp1 = 0, resultp2 = 0;  in dbl_fsub()  local
74                     Dbl_makequietnan(resultp1,resultp2);  in dbl_fsub()
75 		    Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
218 		 /*into*/resultp1,resultp2);  in dbl_fsub()
219 		if(Dbl_iszero_mantissa(resultp1,resultp2))  in dbl_fsub()
223 			Dbl_setone_sign(resultp1);  in dbl_fsub()
227 			Dbl_setzero_sign(resultp1);  in dbl_fsub()
229 		    Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
236 		 /*into*/resultp1,resultp2);  in dbl_fsub()
237 		if(Dbl_isone_hidden(resultp1))  in dbl_fsub()
239 		    Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
246 	    	sign_save = Dbl_signextendedsign(resultp1);  in dbl_fsub()
247 		Dbl_leftshiftby1(resultp1,resultp2);  in dbl_fsub()
248 		Dbl_normalize(resultp1,resultp2,result_exponent);  in dbl_fsub()
249 		Dbl_set_sign(resultp1,/*using*/sign_save);  in dbl_fsub()
250                 Dbl_setwrapped_exponent(resultp1,result_exponent,unfl);  in dbl_fsub()
251 		Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
255 	    Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
292 	 /*with*/extent,/*into*/resultp1,resultp2);  in dbl_fsub()
293 	if(Dbl_iszero_hidden(resultp1))  in dbl_fsub()
305 	    sign_save = Dbl_signextendedsign(resultp1);  in dbl_fsub()
306             Dbl_leftshiftby1_withextent(resultp1,resultp2,extent,resultp1,resultp2);  in dbl_fsub()
312     	    if(Dbl_iszero(resultp1,resultp2))  in dbl_fsub()
315 		if(Is_rounding_mode(ROUNDMINUS)) Dbl_setone_sign(resultp1);  in dbl_fsub()
316 		Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
321 	    if(Dbl_isone_hidden(resultp1))  in dbl_fsub()
332 		    Dbl_set_sign(resultp1,/*using*/sign_save);  in dbl_fsub()
352 	    while(Dbl_iszero_hiddenhigh7mantissa(resultp1))  in dbl_fsub()
354 		Dbl_leftshiftby8(resultp1,resultp2);  in dbl_fsub()
359 	    if(Dbl_iszero_hiddenhigh3mantissa(resultp1))  in dbl_fsub()
362 		Dbl_leftshiftby4(resultp1,resultp2);  in dbl_fsub()
368 	    if((jumpsize = Dbl_hiddenhigh3mantissa(resultp1)) > 7)  in dbl_fsub()
372 		Dbl_set_sign(resultp1,/*using*/sign_save);  in dbl_fsub()
373 		Dbl_set_exponent(resultp1,/*using*/result_exponent);  in dbl_fsub()
374 		Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
377 	    Dbl_sethigh4bits(resultp1,/*using*/sign_save);  in dbl_fsub()
382 		    Dbl_leftshiftby3(resultp1,resultp2);  in dbl_fsub()
389 		    Dbl_leftshiftby2(resultp1,resultp2);  in dbl_fsub()
398 		    Dbl_leftshiftby1(resultp1,resultp2);  in dbl_fsub()
405 		Dbl_set_exponent(resultp1,/*using*/result_exponent);  in dbl_fsub()
406 		Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
413 		Dbl_set_sign(resultp1,sign_save);  in dbl_fsub()
414                 Dbl_setwrapped_exponent(resultp1,result_exponent,unfl);  in dbl_fsub()
415 		Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
423 	    Dbl_fix_overshift(resultp1,resultp2,(1-result_exponent),extent);  in dbl_fsub()
424 	    Dbl_clear_signexponent(resultp1);  in dbl_fsub()
425 	    Dbl_set_sign(resultp1,sign_save);  in dbl_fsub()
426 	    Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
434 	Dbl_addition(leftp1,leftp2,rightp1,rightp2,/*to*/resultp1,resultp2);  in dbl_fsub()
435 	if(Dbl_isone_hiddenoverflow(resultp1))  in dbl_fsub()
439 	    Dbl_arithrightshiftby1(resultp1,resultp2);  in dbl_fsub()
462 		    Dbl_increment(resultp1,resultp2);  in dbl_fsub()
468 	    if(Dbl_iszero_sign(resultp1))  in dbl_fsub()
471 		Dbl_increment(resultp1,resultp2);  in dbl_fsub()
476 	    if(Dbl_isone_sign(resultp1))  in dbl_fsub()
479 		Dbl_increment(resultp1,resultp2);  in dbl_fsub()
485 	if(Dbl_isone_hiddenoverflow(resultp1)) result_exponent++;  in dbl_fsub()
492 	    Dbl_setwrapped_exponent(resultp1,result_exponent,ovfl);  in dbl_fsub()
493 	    Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()
504 	    Dbl_setoverflow(resultp1,resultp2);  in dbl_fsub()
507     else Dbl_set_exponent(resultp1,result_exponent);  in dbl_fsub()
508     Dbl_copytoptr(resultp1,resultp2,dstptr);  in dbl_fsub()