]>
Commit | Line | Data |
---|---|---|
04277e02 | 1 | /* Copyright (C) 2000-2019 Free Software Foundation, Inc. |
d5efd131 MF |
2 | This file is part of the GNU C Library. |
3 | ||
4 | The GNU C Library is free software; you can redistribute it and/or | |
5 | modify it under the terms of the GNU Lesser General Public | |
6 | License as published by the Free Software Foundation; either | |
7 | version 2.1 of the License, or (at your option) any later version. | |
8 | ||
9 | The GNU C Library is distributed in the hope that it will be useful, | |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
12 | Lesser General Public License for more details. | |
13 | ||
14 | You should have received a copy of the GNU Lesser General Public | |
75efb018 | 15 | License along with the GNU C Library; if not, see |
5a82c748 | 16 | <https://www.gnu.org/licenses/>. */ |
d5efd131 MF |
17 | |
18 | #ifndef _IEEE754_H | |
d5efd131 | 19 | #define _IEEE754_H 1 |
aa706e13 | 20 | |
d5efd131 MF |
21 | #include <features.h> |
22 | ||
aa706e13 | 23 | #include <bits/endian.h> |
d5efd131 MF |
24 | |
25 | __BEGIN_DECLS | |
26 | ||
27 | union ieee754_float | |
28 | { | |
29 | float f; | |
30 | ||
31 | /* This is the IEEE 754 single-precision format. */ | |
32 | struct | |
33 | { | |
34 | #if __BYTE_ORDER == __BIG_ENDIAN | |
35 | unsigned int negative:1; | |
36 | unsigned int exponent:8; | |
37 | unsigned int mantissa:23; | |
38 | #endif /* Big endian. */ | |
39 | #if __BYTE_ORDER == __LITTLE_ENDIAN | |
40 | unsigned int mantissa:23; | |
41 | unsigned int exponent:8; | |
42 | unsigned int negative:1; | |
43 | #endif /* Little endian. */ | |
44 | } ieee; | |
45 | ||
46 | /* This format makes it easier to see if a NaN is a signalling NaN. */ | |
47 | struct | |
48 | { | |
49 | #if __BYTE_ORDER == __BIG_ENDIAN | |
50 | unsigned int negative:1; | |
51 | unsigned int exponent:8; | |
52 | unsigned int quiet_nan:1; | |
53 | unsigned int mantissa:22; | |
54 | #endif /* Big endian. */ | |
55 | #if __BYTE_ORDER == __LITTLE_ENDIAN | |
56 | unsigned int mantissa:22; | |
57 | unsigned int quiet_nan:1; | |
58 | unsigned int exponent:8; | |
59 | unsigned int negative:1; | |
60 | #endif /* Little endian. */ | |
61 | } ieee_nan; | |
62 | }; | |
63 | ||
64 | #define IEEE754_FLOAT_BIAS 0x7f /* Added to exponent. */ | |
65 | ||
66 | ||
67 | union ieee754_double | |
68 | { | |
69 | double d; | |
70 | ||
71 | /* This is the IEEE 754 double-precision format. */ | |
72 | struct | |
73 | { | |
74 | #if __BYTE_ORDER == __BIG_ENDIAN | |
75 | unsigned int negative:1; | |
76 | unsigned int exponent:11; | |
77 | /* Together these comprise the mantissa. */ | |
78 | unsigned int mantissa0:20; | |
79 | unsigned int mantissa1:32; | |
80 | #endif /* Big endian. */ | |
81 | #if __BYTE_ORDER == __LITTLE_ENDIAN | |
82 | # if __FLOAT_WORD_ORDER == __BIG_ENDIAN | |
83 | unsigned int mantissa0:20; | |
84 | unsigned int exponent:11; | |
85 | unsigned int negative:1; | |
86 | unsigned int mantissa1:32; | |
87 | # else | |
88 | /* Together these comprise the mantissa. */ | |
89 | unsigned int mantissa1:32; | |
90 | unsigned int mantissa0:20; | |
91 | unsigned int exponent:11; | |
92 | unsigned int negative:1; | |
93 | # endif | |
94 | #endif /* Little endian. */ | |
95 | } ieee; | |
96 | ||
97 | /* This format makes it easier to see if a NaN is a signalling NaN. */ | |
98 | struct | |
99 | { | |
100 | #if __BYTE_ORDER == __BIG_ENDIAN | |
101 | unsigned int negative:1; | |
102 | unsigned int exponent:11; | |
103 | unsigned int quiet_nan:1; | |
104 | /* Together these comprise the mantissa. */ | |
105 | unsigned int mantissa0:19; | |
106 | unsigned int mantissa1:32; | |
107 | #else | |
108 | # if __FLOAT_WORD_ORDER == __BIG_ENDIAN | |
109 | unsigned int mantissa0:19; | |
110 | unsigned int quiet_nan:1; | |
111 | unsigned int exponent:11; | |
112 | unsigned int negative:1; | |
113 | unsigned int mantissa1:32; | |
114 | # else | |
115 | /* Together these comprise the mantissa. */ | |
116 | unsigned int mantissa1:32; | |
117 | unsigned int mantissa0:19; | |
118 | unsigned int quiet_nan:1; | |
119 | unsigned int exponent:11; | |
120 | unsigned int negative:1; | |
121 | # endif | |
122 | #endif | |
123 | } ieee_nan; | |
124 | }; | |
125 | ||
126 | #define IEEE754_DOUBLE_BIAS 0x3ff /* Added to exponent. */ | |
127 | ||
128 | ||
129 | union ieee854_long_double | |
130 | { | |
131 | long double d; | |
132 | ||
133 | /* This is the IEEE 854 double-extended-precision format. */ | |
134 | struct | |
135 | { | |
136 | #if __BYTE_ORDER == __BIG_ENDIAN | |
137 | unsigned int empty0:32; | |
138 | unsigned int negative:1; | |
139 | unsigned int exponent:15; | |
140 | unsigned int empty1:16; | |
141 | unsigned int mantissa0:32; | |
142 | unsigned int mantissa1:32; | |
143 | #endif | |
144 | #if __BYTE_ORDER == __LITTLE_ENDIAN | |
145 | # if __FLOAT_WORD_ORDER == __BIG_ENDIAN | |
146 | unsigned int empty0:32; | |
147 | unsigned int exponent:15; | |
148 | unsigned int negative:1; | |
149 | unsigned int empty1:16; | |
150 | unsigned int mantissa0:32; | |
151 | unsigned int mantissa1:32; | |
152 | # else | |
153 | unsigned int mantissa1:32; | |
154 | unsigned int mantissa0:32; | |
155 | unsigned int exponent:15; | |
156 | unsigned int negative:1; | |
157 | unsigned int empty1:16; | |
158 | unsigned int empty0:32; | |
159 | # endif | |
160 | #endif | |
161 | } ieee; | |
162 | ||
163 | /* This is for NaNs in the IEEE 854 double-extended-precision format. */ | |
164 | struct | |
165 | { | |
166 | #if __BYTE_ORDER == __BIG_ENDIAN | |
167 | unsigned int empty0:32; | |
168 | unsigned int negative:1; | |
169 | unsigned int exponent:15; | |
170 | unsigned int empty1:16; | |
171 | unsigned int one:1; | |
172 | unsigned int quiet_nan:1; | |
173 | unsigned int mantissa0:30; | |
174 | unsigned int mantissa1:32; | |
175 | #endif | |
176 | #if __BYTE_ORDER == __LITTLE_ENDIAN | |
177 | # if __FLOAT_WORD_ORDER == __BIG_ENDIAN | |
178 | unsigned int empty0:32; | |
179 | unsigned int exponent:15; | |
180 | unsigned int negative:1; | |
181 | unsigned int empty1:16; | |
182 | unsigned int mantissa0:30; | |
183 | unsigned int quiet_nan:1; | |
184 | unsigned int one:1; | |
185 | unsigned int mantissa1:32; | |
186 | # else | |
187 | unsigned int mantissa1:32; | |
188 | unsigned int mantissa0:30; | |
189 | unsigned int quiet_nan:1; | |
190 | unsigned int one:1; | |
191 | unsigned int exponent:15; | |
192 | unsigned int negative:1; | |
193 | unsigned int empty1:16; | |
194 | unsigned int empty0:32; | |
195 | # endif | |
196 | #endif | |
197 | } ieee_nan; | |
198 | }; | |
199 | ||
200 | #define IEEE854_LONG_DOUBLE_BIAS 0x3fff | |
201 | ||
202 | __END_DECLS | |
203 | ||
204 | #endif /* ieee754.h */ |