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. */
*** 43,58 **** #define LD_RE(x) __real__ x #define LD_IM(x) __imag__ x #include <complex.h> #else - #define dcomplex double complex #define fcomplex float complex #define ldcomplex long double complex ! #define _X_RE(__t, __z) ((__t *) &__z)[0] ! #define _X_IM(__t, __z) ((__t *) &__z)[1] #define D_RE(__z) _X_RE(double, __z) #define D_IM(__z) _X_IM(double, __z) #define F_RE(__z) _X_RE(float, __z) #define F_IM(__z) _X_IM(float, __z) #define LD_RE(__z) _X_RE(long double, __z) --- 44,58 ---- #define LD_RE(x) __real__ x #define LD_IM(x) __imag__ x #include <complex.h> #else #define dcomplex double complex #define fcomplex float complex #define ldcomplex long double complex ! #define _X_RE(__t, __z) ((__t *)&__z)[0] ! #define _X_IM(__t, __z) ((__t *)&__z)[1] #define D_RE(__z) _X_RE(double, __z) #define D_IM(__z) _X_IM(double, __z) #define F_RE(__z) _X_RE(float, __z) #define F_IM(__z) _X_IM(float, __z) #define LD_RE(__z) _X_RE(long double, __z)
*** 62,89 **** #endif #if defined(__sparc) #define HIWORD 0 #define LOWORD 1 ! #define HI_XWORD(x) ((unsigned *) &x)[0] ! #define XFSCALE(x, n) ((unsigned *) &x)[0] += n << 16 /* signbitl(x) == 0 */ ! #define CHOPPED(x) ((long double) ((double) (x))) #elif defined(__x86) #define HIWORD 1 #define LOWORD 0 ! #define HI_XWORD(x) ((((int *) &x)[2] << 16) | \ ! (0xffff & ((unsigned *) &x)[1] >> 15)) ! #define XFSCALE(x, n) ((unsigned short *) &x)[4] += n /* signbitl(x) == 0 */ ! #define CHOPPED(x) ((long double) ((float) (x))) #else #error Unknown architecture #endif ! #define HI_WORD(x) ((int *) &x)[HIWORD] /* for double */ ! #define LO_WORD(x) ((int *) &x)[LOWORD] /* for double */ ! #define THE_WORD(x) ((int *) &x)[0] /* for float */ /* * iy:ly must have the sign bit already cleared */ #define ISINF(iy, ly) (((iy - 0x7ff00000) | ly) == 0) - #endif /* _COMPLEX_WRAPPER_H */ --- 62,88 ---- #endif #if defined(__sparc) #define HIWORD 0 #define LOWORD 1 ! #define HI_XWORD(x) ((unsigned *)&x)[0] ! #define XFSCALE(x, n) ((unsigned *)&x)[0] += n << 16 /* signbitl(x) == 0 */ ! #define CHOPPED(x) ((long double)((double)(x))) #elif defined(__x86) #define HIWORD 1 #define LOWORD 0 ! #define HI_XWORD(x) ((((int *)&x)[2] << 16) | (0xffff & \ ! ((unsigned *)&x)[1] >> 15)) ! #define XFSCALE(x, n) ((unsigned short *)&x)[4] += n /* signbitl(x) == 0 */ ! #define CHOPPED(x) ((long double)((float)(x))) #else #error Unknown architecture #endif ! #define HI_WORD(x) ((int *)&x)[HIWORD] /* for double */ ! #define LO_WORD(x) ((int *)&x)[LOWORD] /* for double */ ! #define THE_WORD(x) ((int *)&x)[0] /* for float */ /* * iy:ly must have the sign bit already cleared */ #define ISINF(iy, ly) (((iy - 0x7ff00000) | ly) == 0) #endif /* _COMPLEX_WRAPPER_H */