/Linux-v5.4/arch/parisc/math-emu/ |
D | dfsqrt.c | 44 register unsigned int srcp1, srcp2, resultp1, resultp2; in dbl_fsqrt() local 49 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_fsqrt() 53 if ((src_exponent = Dbl_exponent(srcp1)) == DBL_INFINITY_EXPONENT) { in dbl_fsqrt() 57 if (Dbl_isone_signaling(srcp1)) { in dbl_fsqrt() 62 Dbl_set_quiet(srcp1); in dbl_fsqrt() 68 if (Dbl_iszero_sign(srcp1) || in dbl_fsqrt() 69 Dbl_isnotzero_mantissa(srcp1,srcp2)) { in dbl_fsqrt() 70 Dbl_copytoptr(srcp1,srcp2,dstptr); in dbl_fsqrt() 78 if (Dbl_iszero_exponentmantissa(srcp1,srcp2)) { in dbl_fsqrt() 79 Dbl_copytoptr(srcp1,srcp2,dstptr); in dbl_fsqrt() [all …]
|
D | fcnvxf.c | 173 int dst_exponent, srcp1; in dbl_to_sgl_fcnvxf() local 176 Dint_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvxf() 180 if (srcp1 < 0) { in dbl_to_sgl_fcnvxf() 182 Dint_negate(srcp1,srcp2); in dbl_to_sgl_fcnvxf() 187 if (srcp1 == 0 && srcp2 == 0) { in dbl_to_sgl_fcnvxf() 197 if (srcp1 == 0) { in dbl_to_sgl_fcnvxf() 206 srcp1 = srcp2 << dst_exponent; in dbl_to_sgl_fcnvxf() 210 srcp1 = srcp2 >> 1; in dbl_to_sgl_fcnvxf() 226 Find_ms_one_bit(srcp1,dst_exponent); in dbl_to_sgl_fcnvxf() 229 Variable_shift_double(srcp1,srcp2,(32-dst_exponent), in dbl_to_sgl_fcnvxf() [all …]
|
D | fcnvfx.c | 269 register unsigned int srcp1,srcp2, tempp1,tempp2; in dbl_to_sgl_fcnvfx() local 273 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvfx() 274 src_exponent = Dbl_exponent(srcp1) - DBL_BIAS; in dbl_to_sgl_fcnvfx() 281 if (Dbl_isoverflow_to_int(src_exponent,srcp1,srcp2)) { in dbl_to_sgl_fcnvfx() 282 if (Dbl_iszero_sign(srcp1)) result = 0x7fffffff; in dbl_to_sgl_fcnvfx() 297 tempp1 = srcp1; in dbl_to_sgl_fcnvfx() 301 if (Dbl_isone_sign(srcp1) && (src_exponent <= SGL_FX_MAX_EXP)) in dbl_to_sgl_fcnvfx() 306 if (Dbl_isinexact_to_fix(srcp1,srcp2,src_exponent)) { in dbl_to_sgl_fcnvfx() 311 if (Dbl_iszero_sign(srcp1)) result++; in dbl_to_sgl_fcnvfx() 314 if (Dbl_isone_sign(srcp1)) result--; in dbl_to_sgl_fcnvfx() [all …]
|
D | fcnvuf.c | 153 unsigned int srcp1, srcp2, result = 0; in dbl_to_sgl_fcnvuf() local 155 Duint_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvuf() 158 if (srcp1 == 0 && srcp2 == 0) { in dbl_to_sgl_fcnvuf() 167 if (srcp1 == 0) { in dbl_to_sgl_fcnvuf() 175 srcp1 = srcp2 << dst_exponent+1; in dbl_to_sgl_fcnvuf() 190 Find_ms_one_bit(srcp1,dst_exponent); in dbl_to_sgl_fcnvuf() 193 Variable_shift_double(srcp1,srcp2,(31-dst_exponent), in dbl_to_sgl_fcnvuf() 194 srcp1); in dbl_to_sgl_fcnvuf() 198 Sgl_set_mantissa(result, srcp1 >> SGL_EXP_LENGTH); in dbl_to_sgl_fcnvuf() 202 if (Duint_isinexact_to_sgl(srcp1,srcp2)) { in dbl_to_sgl_fcnvuf() [all …]
|
D | fcnvfu.c | 291 register unsigned int srcp1, srcp2, result; in dbl_to_sgl_fcnvfu() local 295 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvfu() 296 src_exponent = Dbl_exponent(srcp1) - DBL_BIAS; in dbl_to_sgl_fcnvfu() 302 if (Dbl_isone_sign(srcp1)) { in dbl_to_sgl_fcnvfu() 322 if (Dbl_isone_sign(srcp1)) { in dbl_to_sgl_fcnvfu() 331 Dbl_clear_signexponent_set_hidden(srcp1); in dbl_to_sgl_fcnvfu() 332 Suint_from_dbl_mantissa(srcp1,srcp2,src_exponent,result); in dbl_to_sgl_fcnvfu() 335 if (Dbl_isinexact_to_unsigned(srcp1,srcp2,src_exponent)) { in dbl_to_sgl_fcnvfu() 345 if(Dbl_isone_roundbit(srcp1,srcp2,src_exponent) && in dbl_to_sgl_fcnvfu() 346 (Dbl_isone_stickybit(srcp1,srcp2,src_exponent)|| in dbl_to_sgl_fcnvfu() [all …]
|
D | frnd.c | 145 register unsigned int srcp1, srcp2, resultp1, resultp2; in dbl_frnd() local 149 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_frnd() 153 if ((src_exponent = Dbl_exponent(srcp1)) == DBL_INFINITY_EXPONENT) { in dbl_frnd() 157 if (Dbl_isone_signaling(srcp1)) { in dbl_frnd() 162 Dbl_set_quiet(srcp1); in dbl_frnd() 167 Dbl_copytoptr(srcp1,srcp2,dstptr); in dbl_frnd() 174 Dbl_copytoptr(srcp1,srcp2,dstptr); in dbl_frnd() 181 Dbl_clear_exponent_set_hidden(srcp1); in dbl_frnd() 182 resultp1 = srcp1; in dbl_frnd() 186 if (Dbl_isinexact_to_fix(srcp1,srcp2,src_exponent)) { in dbl_frnd() [all …]
|
D | fcnvfut.c | 189 register unsigned int srcp1, srcp2, result; in dbl_to_sgl_fcnvfut() local 192 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvfut() 193 src_exponent = Dbl_exponent(srcp1) - DBL_BIAS; in dbl_to_sgl_fcnvfut() 199 if (Dbl_isone_sign(srcp1)) { in dbl_to_sgl_fcnvfut() 219 if (Dbl_isone_sign(srcp1)) { in dbl_to_sgl_fcnvfut() 228 Dbl_clear_signexponent_set_hidden(srcp1); in dbl_to_sgl_fcnvfut() 229 Suint_from_dbl_mantissa(srcp1,srcp2,src_exponent,result); in dbl_to_sgl_fcnvfut() 233 if (Dbl_isinexact_to_unsigned(srcp1,srcp2,src_exponent)) { in dbl_to_sgl_fcnvfut() 242 if (Dbl_isnotzero_exponentmantissa(srcp1,srcp2)) { in dbl_to_sgl_fcnvfut() 259 register unsigned int srcp1, srcp2, resultp1, resultp2; in dbl_to_dbl_fcnvfut() local [all …]
|
D | fcnvfxt.c | 190 register unsigned int srcp1, srcp2, tempp1, tempp2; in dbl_to_sgl_fcnvfxt() local 193 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvfxt() 194 src_exponent = Dbl_exponent(srcp1) - DBL_BIAS; in dbl_to_sgl_fcnvfxt() 201 if (Dbl_isoverflow_to_int(src_exponent,srcp1,srcp2)) { in dbl_to_sgl_fcnvfxt() 202 if (Dbl_iszero_sign(srcp1)) result = 0x7fffffff; in dbl_to_sgl_fcnvfxt() 217 tempp1 = srcp1; in dbl_to_sgl_fcnvfxt() 221 if (Dbl_isone_sign(srcp1) && (src_exponent <= SGL_FX_MAX_EXP)) in dbl_to_sgl_fcnvfxt() 227 if (Dbl_isinexact_to_fix(srcp1,srcp2,src_exponent)) { in dbl_to_sgl_fcnvfxt() 236 if (Dbl_isnotzero_exponentmantissa(srcp1,srcp2)) { in dbl_to_sgl_fcnvfxt() 256 register unsigned int srcp1, srcp2, tempp1, tempp2, resultp2; in dbl_to_dbl_fcnvfxt() local [all …]
|
D | fcnvff.c | 134 register unsigned int srcp1, srcp2, result; in dbl_to_sgl_fcnvff() local 140 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvff() 141 src_exponent = Dbl_exponent(srcp1); in dbl_to_sgl_fcnvff() 142 Sgl_all(result) = Dbl_allp1(srcp1); /* set sign of result */ in dbl_to_sgl_fcnvff() 150 if (Dbl_iszero_mantissa(srcp1,srcp2)) { in dbl_to_sgl_fcnvff() 161 if (Dbl_isone_signaling(srcp1)) { in dbl_to_sgl_fcnvff() 167 Dbl_set_quiet(srcp1); in dbl_to_sgl_fcnvff() 174 Sgl_set_mantissa(result,Dallp1(srcp1)<<3 | Dallp2(srcp2)>>29); in dbl_to_sgl_fcnvff() 184 Dbl_to_sgl_mantissa(srcp1,srcp2,dest_mantissa,inexact,guardbit, in dbl_to_sgl_fcnvff() 188 if (Dbl_iszero_exponentmantissa(srcp1,srcp2)){ in dbl_to_sgl_fcnvff() [all …]
|