Print this page
@@ -492,11 +492,11 @@
if (n > 78 || y == 0.0L) {
#else
if (n > 122 || y == 0.0L) {
#endif
- XFSCALE(x, 0x3fff - (ix >> 16));
+ XFSCALE(x, (0x3fff - (ix >> 16)));
i = ((ix & 0xffff) + 0x100) >> 9; /* 7.5 bits of x */
zk = 1.0L + ((long double) i) * 0.0078125L;
z = x - zk;
dk = (double)z;
@@ -515,12 +515,12 @@
w = k_log_NKzl(n, k, zh, er);
} else {
/*
* compute z = x*x + y*y
*/
- XFSCALE(x, 0x3fff - (ix >> 16));
- XFSCALE(y, 0x3fff - n - (iy >> 16));
+ XFSCALE(x, (0x3fff - (ix >> 16)));
+ XFSCALE(y, (0x3fff - n - (iy >> 16)));
ix = (ix & 0xffff) | 0x3fff0000;
iy = (iy & 0xffff) | (0x3fff0000 - (n << 16));
nx -= 0x3fff;
t1 = x * x; t2 = y * y;
wh = x;