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. */
*** 36,47 **** #include "libm.h" #define n0 0 long double ! scalbl(long double x, long double fn) { ! int *py = (int *) &fn, n; long double z; if (isnanl(x) || isnanl(fn)) return (x * fn); --- 37,49 ---- #include "libm.h" #define n0 0 long double ! scalbl(long double x, long double fn) ! { ! int *py = (int *)&fn, n; long double z; if (isnanl(x) || isnanl(fn)) return (x * fn);
*** 52,68 **** if ((py[n0] & 0x80000000) != 0) return (x / (-fn)); else return (x * fn); } if (rintl(fn) != fn) return ((fn - fn) / (fn - fn)); ! if (fn > 65000.0L) z = scalbnl(x, 65000); ! else if (-fn > 65000.0L) z = scalbnl(x, -65000); ! else { ! n = (int) fn; z = scalbnl(x, n); } return (z); } --- 54,73 ---- if ((py[n0] & 0x80000000) != 0) return (x / (-fn)); else return (x * fn); } + if (rintl(fn) != fn) return ((fn - fn) / (fn - fn)); ! ! if (fn > 65000.0L) { z = scalbnl(x, 65000); ! } else if (-fn > 65000.0L) { z = scalbnl(x, -65000); ! } else { ! n = (int)fn; z = scalbnl(x, n); } + return (z); }