43     register unsigned int leftp1, leftp2, rightp1, rightp2, extent;  in dbl_fsub()  local
51     Dbl_copyfromptr(leftptr,leftp1,leftp2);  in dbl_fsub()
56     Dbl_xortointp1(leftp1,rightp1,/*to*/save);  in dbl_fsub()
61     if ((result_exponent = Dbl_exponent(leftp1)) == DBL_INFINITY_EXPONENT)  in dbl_fsub()
63 	if (Dbl_iszero_mantissa(leftp1,leftp2))   in dbl_fsub()
81 		Dbl_copytoptr(leftp1,leftp2,dstptr);  in dbl_fsub()
90             if (Dbl_isone_signaling(leftp1))   in dbl_fsub()
96         	Dbl_set_quiet(leftp1);  in dbl_fsub()
114 	    Dbl_copytoptr(leftp1,leftp2,dstptr);  in dbl_fsub()
151     Dbl_copytoint_exponentmantissap1(leftp1,signless_upper_left);  in dbl_fsub()
160 	Dbl_xorfromintp1(save,leftp1,/*to*/leftp1);  in dbl_fsub()
162 	result_exponent = Dbl_exponent(leftp1);  in dbl_fsub()
163 	Dbl_invert_sign(leftp1);  in dbl_fsub()
173 	    if(Dbl_iszero_exponentmantissa(leftp1,leftp2))  in dbl_fsub()
179 		    Dbl_or_signs(leftp1,/*with*/rightp1);  in dbl_fsub()
183 		    Dbl_and_signs(leftp1,/*with*/rightp1);  in dbl_fsub()
194 	    	    sign_save = Dbl_signextendedsign(leftp1);  in dbl_fsub()
195 		    Dbl_leftshiftby1(leftp1,leftp2);  in dbl_fsub()
196 		    Dbl_normalize(leftp1,leftp2,result_exponent);  in dbl_fsub()
197 		    Dbl_set_sign(leftp1,/*using*/sign_save);  in dbl_fsub()
198                     Dbl_setwrapped_exponent(leftp1,result_exponent,unfl);  in dbl_fsub()
199 		    Dbl_copytoptr(leftp1,leftp2,dstptr);  in dbl_fsub()
204 	    Dbl_copytoptr(leftp1,leftp2,dstptr);  in dbl_fsub()
217 		Dbl_subtract(leftp1,leftp2,/*minus*/rightp1,rightp2,  in dbl_fsub()
235 		Dbl_addition(leftp1,leftp2,rightp1,rightp2,  in dbl_fsub()
265     Dbl_clear_exponent_set_hidden(leftp1);  in dbl_fsub()
291 	Dbl_subtract_withextension(leftp1,leftp2,/*minus*/rightp1,rightp2,  in dbl_fsub()
434 	Dbl_addition(leftp1,leftp2,rightp1,rightp2,/*to*/resultp1,resultp2);  in dbl_fsub()