40 # define DOUBLE long double  macro
52 # define DOUBLE double  macro
64 # define DOUBLE float  macro
79   ((sizeof (DOUBLE) + sizeof (unsigned int) - 1) / sizeof (unsigned int))
80 typedef union { DOUBLE value; unsigned int word[NWORDS]; } memory_double;
83 FUNC (DOUBLE x)  in FUNC()
130   static DOUBLE zero = L_(0.0);  in FUNC()
132   DOUBLE plus_inf = L_(1.0) / zero;  in FUNC()
133   DOUBLE minus_inf = -L_(1.0) / zero;  in FUNC()
137   static DOUBLE plus_inf = L_(1.0) / L_(0.0);  in FUNC()
138   static DOUBLE minus_inf = -L_(1.0) / L_(0.0);  in FUNC()