H A D | fmpyfadd.c | 65 unsigned int opnd1p1, opnd1p2, opnd2p1, opnd2p2, opnd3p1, opnd3p2; dbl_fmpyfadd() local 78 Dbl_copyfromptr(src3ptr,opnd3p1,opnd3p2); dbl_fmpyfadd() 98 Dbl_isnotnan(opnd3p1,opnd3p2)) { dbl_fmpyfadd() 115 if (Dbl_isinfinity(opnd3p1,opnd3p2) && dbl_fmpyfadd() 116 (Dbl_sign(resultp1) ^ Dbl_sign(opnd3p1))) { dbl_fmpyfadd() 165 else if (Dbl_is_signalingnan(opnd3p1)) { dbl_fmpyfadd() 171 Dbl_set_quiet(opnd3p1); dbl_fmpyfadd() 172 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpyfadd() 188 if (Dbl_isnotnan(opnd3p1,opnd3p2)) { dbl_fmpyfadd() 206 if (Dbl_isinfinity(opnd3p1,opnd3p2) && dbl_fmpyfadd() 207 (Dbl_sign(resultp1) ^ Dbl_sign(opnd3p1))) { dbl_fmpyfadd() 243 else if (Dbl_is_signalingnan(opnd3p1)) { dbl_fmpyfadd() 249 Dbl_set_quiet(opnd3p1); dbl_fmpyfadd() 250 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpyfadd() 264 if (Dbl_isinfinity_exponent(opnd3p1)) { dbl_fmpyfadd() 265 if (Dbl_iszero_mantissa(opnd3p1,opnd3p2)) { dbl_fmpyfadd() 267 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpyfadd() 273 if (Dbl_isone_signaling(opnd3p1)) { dbl_fmpyfadd() 279 Dbl_set_quiet(opnd3p1); dbl_fmpyfadd() 284 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpyfadd() 302 if (Dbl_iszero_exponentmantissa(opnd3p1,opnd3p2)) { dbl_fmpyfadd() 304 Dbl_or_signs(opnd3p1,resultp1); dbl_fmpyfadd() 306 Dbl_and_signs(opnd3p1,resultp1); dbl_fmpyfadd() 312 else if (Dbl_iszero_exponent(opnd3p1) && dbl_fmpyfadd() 315 sign_save = Dbl_signextendedsign(opnd3p1); dbl_fmpyfadd() 317 Dbl_leftshiftby1(opnd3p1,opnd3p2); dbl_fmpyfadd() 318 Dbl_normalize(opnd3p1,opnd3p2,result_exponent); dbl_fmpyfadd() 319 Dbl_set_sign(opnd3p1,/*using*/sign_save); dbl_fmpyfadd() 320 Dbl_setwrapped_exponent(opnd3p1,result_exponent, dbl_fmpyfadd() 322 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpyfadd() 326 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpyfadd() 344 if (Dbl_iszero_exponentmantissa(opnd3p1,opnd3p2)) { dbl_fmpyfadd() 346 Dbl_or_signs(opnd3p1,resultp1); dbl_fmpyfadd() 348 Dbl_and_signs(opnd3p1,resultp1); dbl_fmpyfadd() 354 else if (Dbl_iszero_exponent(opnd3p1) && dbl_fmpyfadd() 357 sign_save = Dbl_signextendedsign(opnd3p1); dbl_fmpyfadd() 359 Dbl_leftshiftby1(opnd3p1,opnd3p2); dbl_fmpyfadd() 360 Dbl_normalize(opnd3p1,opnd3p2,result_exponent); dbl_fmpyfadd() 361 Dbl_set_sign(opnd3p1,/*using*/sign_save); dbl_fmpyfadd() 362 Dbl_setwrapped_exponent(opnd3p1,result_exponent, dbl_fmpyfadd() 364 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpyfadd() 368 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpyfadd() 436 add_exponent = Dbl_exponent(opnd3p1); dbl_fmpyfadd() 443 if (Dbl_iszero_mantissa(opnd3p1,opnd3p2)) { dbl_fmpyfadd() 462 sign_save = Dbl_signextendedsign(opnd3p1); /* save sign */ dbl_fmpyfadd() 463 Dbl_clear_signexponent(opnd3p1); dbl_fmpyfadd() 464 Dbl_leftshiftby1(opnd3p1,opnd3p2); dbl_fmpyfadd() 465 Dbl_normalize(opnd3p1,opnd3p2,add_exponent); dbl_fmpyfadd() 466 Dbl_set_sign(opnd3p1,sign_save); /* restore sign */ dbl_fmpyfadd() 468 Dbl_clear_exponent_set_hidden(opnd3p1); dbl_fmpyfadd() 473 Dbl_copyto_dblext(opnd3p1,opnd3p2,rightp1,rightp2,rightp3,rightp4); dbl_fmpyfadd() 724 unsigned int opnd1p1, opnd1p2, opnd2p1, opnd2p2, opnd3p1, opnd3p2; dbl_fmpynfadd() local 737 Dbl_copyfromptr(src3ptr,opnd3p1,opnd3p2); dbl_fmpynfadd() 758 Dbl_isnotnan(opnd3p1,opnd3p2)) { dbl_fmpynfadd() 775 if (Dbl_isinfinity(opnd3p1,opnd3p2) && dbl_fmpynfadd() 776 (Dbl_sign(resultp1) ^ Dbl_sign(opnd3p1))) { dbl_fmpynfadd() 825 else if (Dbl_is_signalingnan(opnd3p1)) { dbl_fmpynfadd() 831 Dbl_set_quiet(opnd3p1); dbl_fmpynfadd() 832 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpynfadd() 848 if (Dbl_isnotnan(opnd3p1,opnd3p2)) { dbl_fmpynfadd() 866 if (Dbl_isinfinity(opnd3p1,opnd3p2) && dbl_fmpynfadd() 867 (Dbl_sign(resultp1) ^ Dbl_sign(opnd3p1))) { dbl_fmpynfadd() 903 else if (Dbl_is_signalingnan(opnd3p1)) { dbl_fmpynfadd() 909 Dbl_set_quiet(opnd3p1); dbl_fmpynfadd() 910 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpynfadd() 924 if (Dbl_isinfinity_exponent(opnd3p1)) { dbl_fmpynfadd() 925 if (Dbl_iszero_mantissa(opnd3p1,opnd3p2)) { dbl_fmpynfadd() 927 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpynfadd() 933 if (Dbl_isone_signaling(opnd3p1)) { dbl_fmpynfadd() 939 Dbl_set_quiet(opnd3p1); dbl_fmpynfadd() 944 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpynfadd() 962 if (Dbl_iszero_exponentmantissa(opnd3p1,opnd3p2)) { dbl_fmpynfadd() 964 Dbl_or_signs(opnd3p1,resultp1); dbl_fmpynfadd() 966 Dbl_and_signs(opnd3p1,resultp1); dbl_fmpynfadd() 972 else if (Dbl_iszero_exponent(opnd3p1) && dbl_fmpynfadd() 975 sign_save = Dbl_signextendedsign(opnd3p1); dbl_fmpynfadd() 977 Dbl_leftshiftby1(opnd3p1,opnd3p2); dbl_fmpynfadd() 978 Dbl_normalize(opnd3p1,opnd3p2,result_exponent); dbl_fmpynfadd() 979 Dbl_set_sign(opnd3p1,/*using*/sign_save); dbl_fmpynfadd() 980 Dbl_setwrapped_exponent(opnd3p1,result_exponent, dbl_fmpynfadd() 982 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpynfadd() 986 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpynfadd() 1004 if (Dbl_iszero_exponentmantissa(opnd3p1,opnd3p2)) { dbl_fmpynfadd() 1006 Dbl_or_signs(opnd3p1,resultp1); dbl_fmpynfadd() 1008 Dbl_and_signs(opnd3p1,resultp1); dbl_fmpynfadd() 1014 else if (Dbl_iszero_exponent(opnd3p1) && dbl_fmpynfadd() 1017 sign_save = Dbl_signextendedsign(opnd3p1); dbl_fmpynfadd() 1019 Dbl_leftshiftby1(opnd3p1,opnd3p2); dbl_fmpynfadd() 1020 Dbl_normalize(opnd3p1,opnd3p2,result_exponent); dbl_fmpynfadd() 1021 Dbl_set_sign(opnd3p1,/*using*/sign_save); dbl_fmpynfadd() 1022 Dbl_setwrapped_exponent(opnd3p1,result_exponent, dbl_fmpynfadd() 1024 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpynfadd() 1028 Dbl_copytoptr(opnd3p1,opnd3p2,dstptr); dbl_fmpynfadd() 1096 add_exponent = Dbl_exponent(opnd3p1); dbl_fmpynfadd() 1103 if (Dbl_iszero_mantissa(opnd3p1,opnd3p2)) { dbl_fmpynfadd() 1122 sign_save = Dbl_signextendedsign(opnd3p1); /* save sign */ dbl_fmpynfadd() 1123 Dbl_clear_signexponent(opnd3p1); dbl_fmpynfadd() 1124 Dbl_leftshiftby1(opnd3p1,opnd3p2); dbl_fmpynfadd() 1125 Dbl_normalize(opnd3p1,opnd3p2,add_exponent); dbl_fmpynfadd() 1126 Dbl_set_sign(opnd3p1,sign_save); /* restore sign */ dbl_fmpynfadd() 1128 Dbl_clear_exponent_set_hidden(opnd3p1); dbl_fmpynfadd() 1133 Dbl_copyto_dblext(opnd3p1,opnd3p2,rightp1,rightp2,rightp3,rightp4); dbl_fmpynfadd()
|