Print this page
11210 libm should be cstyle(1ONBLD) clean

*** 20,29 **** --- 20,30 ---- */ /* * Copyright 2011 Nexenta Systems, Inc. All rights reserved. */ + /* * Copyright 2006 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */
*** 31,45 **** #include "libm.h" #if defined(__sparc) long double ! truncl(long double x) { union { unsigned i[4]; long double q; } xx; unsigned hx, sx; int j; xx.q = x; sx = xx.i[0] & 0x80000000; --- 32,48 ---- #include "libm.h" #if defined(__sparc) long double ! truncl(long double x) ! { union { unsigned i[4]; long double q; } xx; + unsigned hx, sx; int j; xx.q = x; sx = xx.i[0] & 0x80000000;
*** 53,91 **** if (hx < 0x3fff0000) return (sx ? -0.0L : 0.0L); j = 0x406f - (hx >> 16); /* 1 <= j <= 112 */ xx.i[0] = hx; if (j >= 96) { /* 96 <= j <= 112 */ xx.i[0] &= ~((1 << (j - 96)) - 1); xx.i[1] = xx.i[2] = xx.i[3] = 0; } else if (j >= 64) { /* 64 <= j <= 95 */ xx.i[1] &= ~((1 << (j - 64)) - 1); xx.i[2] = xx.i[3] = 0; } else if (j >= 32) { /* 32 <= j <= 63 */ xx.i[2] &= ~((1 << (j - 32)) - 1); xx.i[3] = 0; ! } else /* 1 <= j <= 31 */ xx.i[3] &= ~((1 << j) - 1); /* negate result if need be */ if (sx) xx.i[0] |= 0x80000000; return (xx.q); } #elif defined(__x86) long double ! truncl(long double x) { union { unsigned i[3]; long double e; } xx; int ex, sx, i; xx.e = x; ex = xx.i[2] & 0x7fff; sx = xx.i[2] & 0x8000; if (ex < 0x403e) { /* |x| < 2^63 */ if (ex < 0x3fff) /* |x| < 1 */ return (sx ? -0.0L : 0.0L); /* chop x at the integer bit */ --- 56,100 ---- if (hx < 0x3fff0000) return (sx ? -0.0L : 0.0L); j = 0x406f - (hx >> 16); /* 1 <= j <= 112 */ xx.i[0] = hx; + if (j >= 96) { /* 96 <= j <= 112 */ xx.i[0] &= ~((1 << (j - 96)) - 1); xx.i[1] = xx.i[2] = xx.i[3] = 0; } else if (j >= 64) { /* 64 <= j <= 95 */ xx.i[1] &= ~((1 << (j - 64)) - 1); xx.i[2] = xx.i[3] = 0; } else if (j >= 32) { /* 32 <= j <= 63 */ xx.i[2] &= ~((1 << (j - 32)) - 1); xx.i[3] = 0; ! } else { /* 1 <= j <= 31 */ xx.i[3] &= ~((1 << j) - 1); + } /* negate result if need be */ if (sx) xx.i[0] |= 0x80000000; + return (xx.q); } #elif defined(__x86) long double ! truncl(long double x) ! { union { unsigned i[3]; long double e; } xx; + int ex, sx, i; xx.e = x; ex = xx.i[2] & 0x7fff; sx = xx.i[2] & 0x8000; + if (ex < 0x403e) { /* |x| < 2^63 */ if (ex < 0x3fff) /* |x| < 1 */ return (sx ? -0.0L : 0.0L); /* chop x at the integer bit */
*** 95,108 **** xx.i[0] = 0; } else { i = 1 << (0x403d - ex); xx.i[0] &= ~(i | (i - 1)); } return (xx.e); ! } else if (ex < 0x7fff) /* x is integral */ return (x); ! else /* inf or nan */ return (x + x); } #else #error Unknown architecture #endif /* defined(__sparc) || defined(__x86) */ --- 104,119 ---- xx.i[0] = 0; } else { i = 1 << (0x403d - ex); xx.i[0] &= ~(i | (i - 1)); } + return (xx.e); ! } else if (ex < 0x7fff) { /* x is integral */ return (x); ! } else { /* inf or nan */ return (x + x); + } } #else #error Unknown architecture #endif /* defined(__sparc) || defined(__x86) */