42 #define nonfinite(a) unlikely(!isless(fabs(a), inf()))  argument
50 long double __gcc_qadd(double a, double aa, double c, double cc)  in __gcc_qadd()  argument
55 	z = a + c;  in __gcc_qadd()
58 		z = cc + aa + c + a;  in __gcc_qadd()
63 		if (fabs(a) > fabs(c))  in __gcc_qadd()
64 			x.dval[1] = a - z + c + zz;  in __gcc_qadd()
66 			x.dval[1] = c - z + a + zz;  in __gcc_qadd()
68 		q = a - z;  in __gcc_qadd()
69 		zz = q + c + (a - (q + z)) + aa + cc;  in __gcc_qadd()
85 long double __gcc_qsub(double a, double b, double c, double d)  in __gcc_qsub()  argument
87 	return __gcc_qadd(a, b, -c, -d);  in __gcc_qsub()
90 long double __gcc_qmul(double a, double b, double c, double d)  in __gcc_qmul()  argument
95 	t = a * c;		/* Highest order double term.  */  in __gcc_qmul()
105 	asm("fmsub %0,%1,%2,%3" : "=f"(tau) : "f"(a), "f"(c), "f"(t));  in __gcc_qmul()
107 	tau = fmsub(a, c, t);  in __gcc_qmul()
109 	v = a * d;  in __gcc_qmul()