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