1*3cab2bb3Spatrick #ifndef COMPILERRT_DD_HEADER
2*3cab2bb3Spatrick #define COMPILERRT_DD_HEADER
3*3cab2bb3Spatrick
4*3cab2bb3Spatrick #include "../int_lib.h"
5*3cab2bb3Spatrick
6*3cab2bb3Spatrick typedef union {
7*3cab2bb3Spatrick long double ld;
8*3cab2bb3Spatrick struct {
9*3cab2bb3Spatrick double hi;
10*3cab2bb3Spatrick double lo;
11*3cab2bb3Spatrick } s;
12*3cab2bb3Spatrick } DD;
13*3cab2bb3Spatrick
14*3cab2bb3Spatrick typedef union {
15*3cab2bb3Spatrick double d;
16*3cab2bb3Spatrick uint64_t x;
17*3cab2bb3Spatrick } doublebits;
18*3cab2bb3Spatrick
19*3cab2bb3Spatrick #define LOWORDER(xy, xHi, xLo, yHi, yLo) \
20*3cab2bb3Spatrick (((((xHi) * (yHi) - (xy)) + (xHi) * (yLo)) + (xLo) * (yHi)) + (xLo) * (yLo))
21*3cab2bb3Spatrick
local_fabs(double x)22*3cab2bb3Spatrick static __inline ALWAYS_INLINE double local_fabs(double x) {
23*3cab2bb3Spatrick doublebits result = {.d = x};
24*3cab2bb3Spatrick result.x &= UINT64_C(0x7fffffffffffffff);
25*3cab2bb3Spatrick return result.d;
26*3cab2bb3Spatrick }
27*3cab2bb3Spatrick
high26bits(double x)28*3cab2bb3Spatrick static __inline ALWAYS_INLINE double high26bits(double x) {
29*3cab2bb3Spatrick doublebits result = {.d = x};
30*3cab2bb3Spatrick result.x &= UINT64_C(0xfffffffff8000000);
31*3cab2bb3Spatrick return result.d;
32*3cab2bb3Spatrick }
33*3cab2bb3Spatrick
different_sign(double x,double y)34*3cab2bb3Spatrick static __inline ALWAYS_INLINE int different_sign(double x, double y) {
35*3cab2bb3Spatrick doublebits xsignbit = {.d = x}, ysignbit = {.d = y};
36*3cab2bb3Spatrick int result = (int)(xsignbit.x >> 63) ^ (int)(ysignbit.x >> 63);
37*3cab2bb3Spatrick return result;
38*3cab2bb3Spatrick }
39*3cab2bb3Spatrick
40*3cab2bb3Spatrick long double __gcc_qadd(long double, long double);
41*3cab2bb3Spatrick long double __gcc_qsub(long double, long double);
42*3cab2bb3Spatrick long double __gcc_qmul(long double, long double);
43*3cab2bb3Spatrick long double __gcc_qdiv(long double, long double);
44*3cab2bb3Spatrick
45*3cab2bb3Spatrick #endif // COMPILERRT_DD_HEADER
46