| /arch/parisc/math-emu/ |
| D | dfsqrt.c | 57 register unsigned int srcp1, srcp2, resultp1, resultp2; in dbl_fsqrt() local
62 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_fsqrt()
66 if ((src_exponent = Dbl_exponent(srcp1)) == DBL_INFINITY_EXPONENT) { in dbl_fsqrt()
70 if (Dbl_isone_signaling(srcp1)) { in dbl_fsqrt()
75 Dbl_set_quiet(srcp1); in dbl_fsqrt()
81 if (Dbl_iszero_sign(srcp1) || in dbl_fsqrt()
82 Dbl_isnotzero_mantissa(srcp1,srcp2)) { in dbl_fsqrt()
83 Dbl_copytoptr(srcp1,srcp2,dstptr); in dbl_fsqrt()
91 if (Dbl_iszero_exponentmantissa(srcp1,srcp2)) { in dbl_fsqrt()
92 Dbl_copytoptr(srcp1,srcp2,dstptr); in dbl_fsqrt()
[all …]
|
| D | fcnvxf.c | 186 int dst_exponent, srcp1; in dbl_to_sgl_fcnvxf() local
189 Dint_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvxf()
193 if (srcp1 < 0) { in dbl_to_sgl_fcnvxf()
195 Dint_negate(srcp1,srcp2); in dbl_to_sgl_fcnvxf()
200 if (srcp1 == 0 && srcp2 == 0) { in dbl_to_sgl_fcnvxf()
210 if (srcp1 == 0) { in dbl_to_sgl_fcnvxf()
219 srcp1 = srcp2 << dst_exponent; in dbl_to_sgl_fcnvxf()
223 srcp1 = srcp2 >> 1; in dbl_to_sgl_fcnvxf()
239 Find_ms_one_bit(srcp1,dst_exponent); in dbl_to_sgl_fcnvxf()
242 Variable_shift_double(srcp1,srcp2,(32-dst_exponent), in dbl_to_sgl_fcnvxf()
[all …]
|
| D | fcnvfx.c | 282 register unsigned int srcp1,srcp2, tempp1,tempp2; in dbl_to_sgl_fcnvfx() local
286 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvfx()
287 src_exponent = Dbl_exponent(srcp1) - DBL_BIAS; in dbl_to_sgl_fcnvfx()
294 if (Dbl_isoverflow_to_int(src_exponent,srcp1,srcp2)) { in dbl_to_sgl_fcnvfx()
295 if (Dbl_iszero_sign(srcp1)) result = 0x7fffffff; in dbl_to_sgl_fcnvfx()
310 tempp1 = srcp1; in dbl_to_sgl_fcnvfx()
314 if (Dbl_isone_sign(srcp1) && (src_exponent <= SGL_FX_MAX_EXP)) in dbl_to_sgl_fcnvfx()
319 if (Dbl_isinexact_to_fix(srcp1,srcp2,src_exponent)) { in dbl_to_sgl_fcnvfx()
324 if (Dbl_iszero_sign(srcp1)) result++; in dbl_to_sgl_fcnvfx()
327 if (Dbl_isone_sign(srcp1)) result--; in dbl_to_sgl_fcnvfx()
[all …]
|
| D | fcnvuf.c | 166 unsigned int srcp1, srcp2, result = 0; in dbl_to_sgl_fcnvuf() local
168 Duint_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvuf()
171 if (srcp1 == 0 && srcp2 == 0) { in dbl_to_sgl_fcnvuf()
180 if (srcp1 == 0) { in dbl_to_sgl_fcnvuf()
188 srcp1 = srcp2 << dst_exponent+1; in dbl_to_sgl_fcnvuf()
203 Find_ms_one_bit(srcp1,dst_exponent); in dbl_to_sgl_fcnvuf()
206 Variable_shift_double(srcp1,srcp2,(31-dst_exponent), in dbl_to_sgl_fcnvuf()
207 srcp1); in dbl_to_sgl_fcnvuf()
211 Sgl_set_mantissa(result, srcp1 >> SGL_EXP_LENGTH); in dbl_to_sgl_fcnvuf()
215 if (Duint_isinexact_to_sgl(srcp1,srcp2)) { in dbl_to_sgl_fcnvuf()
[all …]
|
| D | frnd.c | 158 register unsigned int srcp1, srcp2, resultp1, resultp2; in dbl_frnd() local
162 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_frnd()
166 if ((src_exponent = Dbl_exponent(srcp1)) == DBL_INFINITY_EXPONENT) { in dbl_frnd()
170 if (Dbl_isone_signaling(srcp1)) { in dbl_frnd()
175 Dbl_set_quiet(srcp1); in dbl_frnd()
180 Dbl_copytoptr(srcp1,srcp2,dstptr); in dbl_frnd()
187 Dbl_copytoptr(srcp1,srcp2,dstptr); in dbl_frnd()
194 Dbl_clear_exponent_set_hidden(srcp1); in dbl_frnd()
195 resultp1 = srcp1; in dbl_frnd()
199 if (Dbl_isinexact_to_fix(srcp1,srcp2,src_exponent)) { in dbl_frnd()
[all …]
|
| D | fcnvfu.c | 304 register unsigned int srcp1, srcp2, result; in dbl_to_sgl_fcnvfu() local
308 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvfu()
309 src_exponent = Dbl_exponent(srcp1) - DBL_BIAS; in dbl_to_sgl_fcnvfu()
315 if (Dbl_isone_sign(srcp1)) { in dbl_to_sgl_fcnvfu()
335 if (Dbl_isone_sign(srcp1)) { in dbl_to_sgl_fcnvfu()
344 Dbl_clear_signexponent_set_hidden(srcp1); in dbl_to_sgl_fcnvfu()
345 Suint_from_dbl_mantissa(srcp1,srcp2,src_exponent,result); in dbl_to_sgl_fcnvfu()
348 if (Dbl_isinexact_to_unsigned(srcp1,srcp2,src_exponent)) { in dbl_to_sgl_fcnvfu()
358 if(Dbl_isone_roundbit(srcp1,srcp2,src_exponent) && in dbl_to_sgl_fcnvfu()
359 (Dbl_isone_stickybit(srcp1,srcp2,src_exponent)|| in dbl_to_sgl_fcnvfu()
[all …]
|
| D | fcnvfut.c | 202 register unsigned int srcp1, srcp2, result; in dbl_to_sgl_fcnvfut() local
205 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvfut()
206 src_exponent = Dbl_exponent(srcp1) - DBL_BIAS; in dbl_to_sgl_fcnvfut()
212 if (Dbl_isone_sign(srcp1)) { in dbl_to_sgl_fcnvfut()
232 if (Dbl_isone_sign(srcp1)) { in dbl_to_sgl_fcnvfut()
241 Dbl_clear_signexponent_set_hidden(srcp1); in dbl_to_sgl_fcnvfut()
242 Suint_from_dbl_mantissa(srcp1,srcp2,src_exponent,result); in dbl_to_sgl_fcnvfut()
246 if (Dbl_isinexact_to_unsigned(srcp1,srcp2,src_exponent)) { in dbl_to_sgl_fcnvfut()
255 if (Dbl_isnotzero_exponentmantissa(srcp1,srcp2)) { in dbl_to_sgl_fcnvfut()
272 register unsigned int srcp1, srcp2, resultp1, resultp2; in dbl_to_dbl_fcnvfut() local
[all …]
|
| D | fcnvfxt.c | 203 register unsigned int srcp1, srcp2, tempp1, tempp2; in dbl_to_sgl_fcnvfxt() local
206 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvfxt()
207 src_exponent = Dbl_exponent(srcp1) - DBL_BIAS; in dbl_to_sgl_fcnvfxt()
214 if (Dbl_isoverflow_to_int(src_exponent,srcp1,srcp2)) { in dbl_to_sgl_fcnvfxt()
215 if (Dbl_iszero_sign(srcp1)) result = 0x7fffffff; in dbl_to_sgl_fcnvfxt()
230 tempp1 = srcp1; in dbl_to_sgl_fcnvfxt()
234 if (Dbl_isone_sign(srcp1) && (src_exponent <= SGL_FX_MAX_EXP)) in dbl_to_sgl_fcnvfxt()
240 if (Dbl_isinexact_to_fix(srcp1,srcp2,src_exponent)) { in dbl_to_sgl_fcnvfxt()
249 if (Dbl_isnotzero_exponentmantissa(srcp1,srcp2)) { in dbl_to_sgl_fcnvfxt()
269 register unsigned int srcp1, srcp2, tempp1, tempp2, resultp2; in dbl_to_dbl_fcnvfxt() local
[all …]
|
| D | fcnvff.c | 147 register unsigned int srcp1, srcp2, result; in dbl_to_sgl_fcnvff() local
153 Dbl_copyfromptr(srcptr,srcp1,srcp2); in dbl_to_sgl_fcnvff()
154 src_exponent = Dbl_exponent(srcp1); in dbl_to_sgl_fcnvff()
155 Sgl_all(result) = Dbl_allp1(srcp1); /* set sign of result */ in dbl_to_sgl_fcnvff()
163 if (Dbl_iszero_mantissa(srcp1,srcp2)) { in dbl_to_sgl_fcnvff()
174 if (Dbl_isone_signaling(srcp1)) { in dbl_to_sgl_fcnvff()
180 Dbl_set_quiet(srcp1); in dbl_to_sgl_fcnvff()
187 Sgl_set_mantissa(result,Dallp1(srcp1)<<3 | Dallp2(srcp2)>>29); in dbl_to_sgl_fcnvff()
197 Dbl_to_sgl_mantissa(srcp1,srcp2,dest_mantissa,inexact,guardbit, in dbl_to_sgl_fcnvff()
201 if (Dbl_iszero_exponentmantissa(srcp1,srcp2)){ in dbl_to_sgl_fcnvff()
[all …]
|