author | michaelm |
Tue, 06 Mar 2012 20:34:38 +0000 | |
changeset 12047 | 320a714614e9 |
parent 10143 | 4e1c885fb4f3 |
child 14342 | 8435a30053c1 |
permissions | -rw-r--r-- |
2 | 1 |
|
2 |
/* |
|
8796
604a43386301
7027910: Add basic cross-compilation support and add ARM/PPC to the known architectures in the open code
dholmes
parents:
7668
diff
changeset
|
3 |
* Copyright (c) 1998, 2011, Oracle and/or its affiliates. All rights reserved. |
2 | 4 |
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
5 |
* |
|
6 |
* This code is free software; you can redistribute it and/or modify it |
|
7 |
* under the terms of the GNU General Public License version 2 only, as |
|
5506 | 8 |
* published by the Free Software Foundation. Oracle designates this |
2 | 9 |
* particular file as subject to the "Classpath" exception as provided |
5506 | 10 |
* by Oracle in the LICENSE file that accompanied this code. |
2 | 11 |
* |
12 |
* This code is distributed in the hope that it will be useful, but WITHOUT |
|
13 |
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
14 |
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
|
15 |
* version 2 for more details (a copy is included in the LICENSE file that |
|
16 |
* accompanied this code). |
|
17 |
* |
|
18 |
* You should have received a copy of the GNU General Public License version |
|
19 |
* 2 along with this work; if not, write to the Free Software Foundation, |
|
20 |
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
|
21 |
* |
|
5506 | 22 |
* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
23 |
* or visit www.oracle.com if you need additional information or have any |
|
24 |
* questions. |
|
2 | 25 |
*/ |
26 |
||
12047
320a714614e9
7113349: Initial changeset for Macosx port to jdk
michaelm
parents:
10143
diff
changeset
|
27 |
#ifdef _ALLBSD_SOURCE |
320a714614e9
7113349: Initial changeset for Macosx port to jdk
michaelm
parents:
10143
diff
changeset
|
28 |
#include <machine/endian.h> |
320a714614e9
7113349: Initial changeset for Macosx port to jdk
michaelm
parents:
10143
diff
changeset
|
29 |
#elif __linux__ |
320a714614e9
7113349: Initial changeset for Macosx port to jdk
michaelm
parents:
10143
diff
changeset
|
30 |
#define __USE_BSD 1 |
320a714614e9
7113349: Initial changeset for Macosx port to jdk
michaelm
parents:
10143
diff
changeset
|
31 |
#include <endian.h> |
320a714614e9
7113349: Initial changeset for Macosx port to jdk
michaelm
parents:
10143
diff
changeset
|
32 |
#endif |
2 | 33 |
#include "jfdlibm.h" |
34 |
||
35 |
#ifdef __NEWVALID /* special setup for Sun test regime */ |
|
36 |
#if defined(i386) || defined(i486) || \ |
|
8796
604a43386301
7027910: Add basic cross-compilation support and add ARM/PPC to the known architectures in the open code
dholmes
parents:
7668
diff
changeset
|
37 |
defined(intel) || defined(x86) || defined(arm) || \ |
604a43386301
7027910: Add basic cross-compilation support and add ARM/PPC to the known architectures in the open code
dholmes
parents:
7668
diff
changeset
|
38 |
defined(i86pc) || defined(_M_IA64) || defined(ia64) |
2 | 39 |
#define _LITTLE_ENDIAN |
40 |
#endif |
|
41 |
#endif |
|
42 |
||
43 |
#ifdef _LITTLE_ENDIAN |
|
44 |
#define __HI(x) *(1+(int*)&x) |
|
45 |
#define __LO(x) *(int*)&x |
|
46 |
#define __HIp(x) *(1+(int*)x) |
|
47 |
#define __LOp(x) *(int*)x |
|
48 |
#else |
|
49 |
#define __HI(x) *(int*)&x |
|
50 |
#define __LO(x) *(1+(int*)&x) |
|
51 |
#define __HIp(x) *(int*)x |
|
52 |
#define __LOp(x) *(1+(int*)x) |
|
53 |
#endif |
|
54 |
||
6850
56966b0a6a0d
6989466: Miscellaneous compiler warnings in java/lang, java/util, java/io, sun/misc native code
alanb
parents:
5506
diff
changeset
|
55 |
#ifndef __P |
2 | 56 |
#ifdef __STDC__ |
57 |
#define __P(p) p |
|
58 |
#else |
|
59 |
#define __P(p) () |
|
60 |
#endif |
|
6850
56966b0a6a0d
6989466: Miscellaneous compiler warnings in java/lang, java/util, java/io, sun/misc native code
alanb
parents:
5506
diff
changeset
|
61 |
#endif |
2 | 62 |
|
63 |
/* |
|
64 |
* ANSI/POSIX |
|
65 |
*/ |
|
66 |
||
67 |
extern int signgam; |
|
68 |
||
69 |
#define MAXFLOAT ((float)3.40282346638528860e+38) |
|
70 |
||
71 |
enum fdversion {fdlibm_ieee = -1, fdlibm_svid, fdlibm_xopen, fdlibm_posix}; |
|
72 |
||
73 |
#define _LIB_VERSION_TYPE enum fdversion |
|
74 |
#define _LIB_VERSION _fdlib_version |
|
75 |
||
76 |
/* if global variable _LIB_VERSION is not desirable, one may |
|
77 |
* change the following to be a constant by: |
|
78 |
* #define _LIB_VERSION_TYPE const enum version |
|
79 |
* In that case, after one initializes the value _LIB_VERSION (see |
|
80 |
* s_lib_version.c) during compile time, it cannot be modified |
|
81 |
* in the middle of a program |
|
82 |
*/ |
|
83 |
extern _LIB_VERSION_TYPE _LIB_VERSION; |
|
84 |
||
85 |
#define _IEEE_ fdlibm_ieee |
|
86 |
#define _SVID_ fdlibm_svid |
|
87 |
#define _XOPEN_ fdlibm_xopen |
|
88 |
#define _POSIX_ fdlibm_posix |
|
89 |
||
90 |
struct exception { |
|
91 |
int type; |
|
92 |
char *name; |
|
93 |
double arg1; |
|
94 |
double arg2; |
|
95 |
double retval; |
|
96 |
}; |
|
97 |
||
98 |
#define HUGE MAXFLOAT |
|
99 |
||
100 |
/* |
|
101 |
* set X_TLOSS = pi*2**52, which is possibly defined in <values.h> |
|
102 |
* (one may replace the following line by "#include <values.h>") |
|
103 |
*/ |
|
104 |
||
105 |
#define X_TLOSS 1.41484755040568800000e+16 |
|
106 |
||
107 |
#define DOMAIN 1 |
|
108 |
#define SING 2 |
|
109 |
#define OVERFLOW 3 |
|
110 |
#define UNDERFLOW 4 |
|
111 |
#define TLOSS 5 |
|
112 |
#define PLOSS 6 |
|
113 |
||
114 |
/* |
|
115 |
* ANSI/POSIX |
|
116 |
*/ |
|
117 |
extern double acos __P((double)); |
|
118 |
extern double asin __P((double)); |
|
119 |
extern double atan __P((double)); |
|
120 |
extern double atan2 __P((double, double)); |
|
121 |
extern double cos __P((double)); |
|
122 |
extern double sin __P((double)); |
|
123 |
extern double tan __P((double)); |
|
124 |
||
125 |
extern double cosh __P((double)); |
|
126 |
extern double sinh __P((double)); |
|
127 |
extern double tanh __P((double)); |
|
128 |
||
129 |
extern double exp __P((double)); |
|
130 |
extern double frexp __P((double, int *)); |
|
131 |
extern double ldexp __P((double, int)); |
|
132 |
extern double log __P((double)); |
|
133 |
extern double log10 __P((double)); |
|
134 |
extern double modf __P((double, double *)); |
|
135 |
||
136 |
extern double pow __P((double, double)); |
|
137 |
extern double sqrt __P((double)); |
|
138 |
||
139 |
extern double ceil __P((double)); |
|
140 |
extern double fabs __P((double)); |
|
141 |
extern double floor __P((double)); |
|
142 |
extern double fmod __P((double, double)); |
|
143 |
||
144 |
extern double hypot __P((double, double)); |
|
145 |
extern int isnan __P((double)); |
|
146 |
extern int finite __P((double)); |
|
147 |
||
148 |
extern double atanh __P((double)); |
|
149 |
extern double cbrt __P((double)); |
|
150 |
extern double logb __P((double)); |
|
151 |
extern double nextafter __P((double, double)); |
|
152 |
extern double remainder __P((double, double)); |
|
153 |
#ifdef _SCALB_INT |
|
154 |
extern double scalb __P((double, int)); |
|
155 |
#else |
|
156 |
extern double scalb __P((double, double)); |
|
157 |
#endif |
|
158 |
||
159 |
extern int matherr __P((struct exception *)); |
|
160 |
||
161 |
/* |
|
162 |
* IEEE Test Vector |
|
163 |
*/ |
|
164 |
extern double significand __P((double)); |
|
165 |
||
166 |
/* |
|
167 |
* Functions callable from C, intended to support IEEE arithmetic. |
|
168 |
*/ |
|
169 |
extern double copysign __P((double, double)); |
|
170 |
extern int ilogb __P((double)); |
|
171 |
extern double rint __P((double)); |
|
172 |
extern double scalbn __P((double, int)); |
|
173 |
||
174 |
/* |
|
175 |
* BSD math library entry points |
|
176 |
*/ |
|
177 |
extern double expm1 __P((double)); |
|
178 |
extern double log1p __P((double)); |
|
179 |
||
180 |
/* ieee style elementary functions */ |
|
181 |
extern double __ieee754_sqrt __P((double)); |
|
182 |
extern double __ieee754_acos __P((double)); |
|
183 |
extern double __ieee754_log __P((double)); |
|
184 |
extern double __ieee754_atanh __P((double)); |
|
185 |
extern double __ieee754_asin __P((double)); |
|
186 |
extern double __ieee754_atan2 __P((double,double)); |
|
187 |
extern double __ieee754_exp __P((double)); |
|
188 |
extern double __ieee754_cosh __P((double)); |
|
189 |
extern double __ieee754_fmod __P((double,double)); |
|
190 |
extern double __ieee754_pow __P((double,double)); |
|
191 |
extern double __ieee754_log10 __P((double)); |
|
192 |
extern double __ieee754_sinh __P((double)); |
|
193 |
extern double __ieee754_hypot __P((double,double)); |
|
194 |
extern double __ieee754_remainder __P((double,double)); |
|
195 |
extern int __ieee754_rem_pio2 __P((double,double*)); |
|
196 |
#ifdef _SCALB_INT |
|
197 |
extern double __ieee754_scalb __P((double,int)); |
|
198 |
#else |
|
199 |
extern double __ieee754_scalb __P((double,double)); |
|
200 |
#endif |
|
201 |
||
202 |
/* fdlibm kernel function */ |
|
203 |
extern double __kernel_standard __P((double,double,int)); |
|
204 |
extern double __kernel_sin __P((double,double,int)); |
|
205 |
extern double __kernel_cos __P((double,double)); |
|
206 |
extern double __kernel_tan __P((double,double,int)); |
|
207 |
extern int __kernel_rem_pio2 __P((double*,double*,int,int,int,const int*)); |