1/* 2 * ==================================================== 3 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 4 * 5 * Developed at SunPro, a Sun Microsystems, Inc. business. 6 * Permission to use, copy, modify, and distribute this 7 * software is freely granted, provided that this notice 8 * is preserved. 9 * ==================================================== 10 */ 11 12/* 13 * from: @(#)fdlibm.h 5.1 93/09/24 |
14 * $FreeBSD: head/lib/msun/src/math_private.h 87805 2001-12-13 17:22:17Z phantom $ |
15 */ 16 17#ifndef _MATH_PRIVATE_H_ |
18#define _MATH_PRIVATE_H_ |
19 20#include <sys/types.h> 21#include <machine/endian.h> 22 |
23/* 24 * The original fdlibm code used statements like: 25 * n0 = ((*(int*)&one)>>29)^1; * index of high word * 26 * ix0 = *(n0+(int*)&x); * high word of x * 27 * ix1 = *((1-n0)+(int*)&x); * low word of x * 28 * to dig two 32 bit words out of the 64 bit IEEE floating point 29 * value. That is non-ANSI, and, moreover, the gcc instruction 30 * scheduler gets it wrong. We instead use the following macros. 31 * Unlike the original code, we determine the endianness at compile 32 * time, not at run time; I don't see much benefit to selecting 33 * endianness at run time. 34 */ |
35 |
36/* 37 * A union which permits us to convert between a double and two 32 bit 38 * ints. 39 */ |
40 41#if BYTE_ORDER == BIG_ENDIAN 42 43typedef union 44{ 45 double value; 46 struct 47 { --- 71 unchanged lines hidden (view full) --- 119#define SET_LOW_WORD(d,v) \ 120do { \ 121 ieee_double_shape_type sl_u; \ 122 sl_u.value = (d); \ 123 sl_u.parts.lsw = (v); \ 124 (d) = sl_u.value; \ 125} while (0) 126 |
127/* 128 * A union which permits us to convert between a float and a 32 bit 129 * int. 130 */ |
131 132typedef union 133{ 134 float value; 135 /* FIXME: Assumes 32 bit int. */ 136 unsigned int word; 137} ieee_float_shape_type; 138 --- 11 unchanged lines hidden (view full) --- 150#define SET_FLOAT_WORD(d,i) \ 151do { \ 152 ieee_float_shape_type sf_u; \ 153 sf_u.word = (i); \ 154 (d) = sf_u.value; \ 155} while (0) 156 157/* ieee style elementary functions */ |
158double __ieee754_sqrt __P((double)); 159double __ieee754_acos __P((double)); 160double __ieee754_acosh __P((double)); 161double __ieee754_log __P((double)); 162double __ieee754_atanh __P((double)); 163double __ieee754_asin __P((double)); 164double __ieee754_atan2 __P((double,double)); 165double __ieee754_exp __P((double)); 166double __ieee754_cosh __P((double)); 167double __ieee754_fmod __P((double,double)); 168double __ieee754_pow __P((double,double)); 169double __ieee754_lgamma_r __P((double,int *)); 170double __ieee754_gamma_r __P((double,int *)); 171double __ieee754_lgamma __P((double)); 172double __ieee754_gamma __P((double)); 173double __ieee754_log10 __P((double)); 174double __ieee754_sinh __P((double)); 175double __ieee754_hypot __P((double,double)); 176double __ieee754_j0 __P((double)); 177double __ieee754_j1 __P((double)); 178double __ieee754_y0 __P((double)); 179double __ieee754_y1 __P((double)); 180double __ieee754_jn __P((int,double)); 181double __ieee754_yn __P((int,double)); 182double __ieee754_remainder __P((double,double)); 183int __ieee754_rem_pio2 __P((double,double*)); 184double __ieee754_scalb __P((double,double)); |
185 186/* fdlibm kernel function */ |
187double __kernel_standard __P((double,double,int)); 188double __kernel_sin __P((double,double,int)); 189double __kernel_cos __P((double,double)); 190double __kernel_tan __P((double,double,int)); 191int __kernel_rem_pio2 __P((double*,double*,int,int,int,const int*)); |
192 |
193/* ieee style elementary float functions */ |
194float __ieee754_sqrtf __P((float)); 195float __ieee754_acosf __P((float)); 196float __ieee754_acoshf __P((float)); 197float __ieee754_logf __P((float)); 198float __ieee754_atanhf __P((float)); 199float __ieee754_asinf __P((float)); 200float __ieee754_atan2f __P((float,float)); 201float __ieee754_expf __P((float)); 202float __ieee754_coshf __P((float)); 203float __ieee754_fmodf __P((float,float)); 204float __ieee754_powf __P((float,float)); 205float __ieee754_lgammaf_r __P((float,int *)); 206float __ieee754_gammaf_r __P((float,int *)); 207float __ieee754_lgammaf __P((float)); 208float __ieee754_gammaf __P((float)); 209float __ieee754_log10f __P((float)); 210float __ieee754_sinhf __P((float)); 211float __ieee754_hypotf __P((float,float)); 212float __ieee754_j0f __P((float)); 213float __ieee754_j1f __P((float)); 214float __ieee754_y0f __P((float)); 215float __ieee754_y1f __P((float)); 216float __ieee754_jnf __P((int,float)); 217float __ieee754_ynf __P((int,float)); 218float __ieee754_remainderf __P((float,float)); 219int __ieee754_rem_pio2f __P((float,float*)); 220float __ieee754_scalbf __P((float,float)); |
221 222/* float versions of fdlibm kernel functions */ |
223float __kernel_sinf __P((float,float,int)); 224float __kernel_cosf __P((float,float)); 225float __kernel_tanf __P((float,float,int)); 226int __kernel_rem_pio2f __P((float*,float*,int,int,int,const int*)); |
227 228#if defined(__alpha__) || defined(__ia64__) 229#define __generic___ieee754_acos __ieee754_acos 230#define __generic___ieee754_asin __ieee754_asin 231#define __generic___ieee754_atan2 __ieee754_atan2 232#define __generic___ieee754_exp __ieee754_exp 233#define __generic___ieee754_fmod __ieee754_fmod 234#define __generic___ieee754_log __ieee754_log --- 12 unchanged lines hidden (view full) --- 247#define __generic_logb logb 248#define __generic_rint rint 249#define __generic_scalbn scalbn 250#define __generic_significand significand 251#define __generic_sin sin 252#define __generic_tan tan 253#endif 254 |
255#endif /* !_MATH_PRIVATE_H_ */ |