1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
|
/*============================================================================
This C header file is part of TestFloat, Release 3e, a package of programs for
testing the correctness of floating-point arithmetic complying with the IEEE
Standard for Floating-Point, by John R. Hauser.
Copyright 2011, 2012, 2013, 2014, 2015, 2017 The Regents of the University of
California. All rights reserved.
Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are met:
1. Redistributions of source code must retain the above copyright notice,
this list of conditions, and the following disclaimer.
2. Redistributions in binary form must reproduce the above copyright notice,
this list of conditions, and the following disclaimer in the documentation
and/or other materials provided with the distribution.
3. Neither the name of the University nor the names of its contributors may
be used to endorse or promote products derived from this software without
specific prior written permission.
THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS "AS IS", AND ANY
EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE, ARE
DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
=============================================================================*/
#include <stdbool.h>
#include <stdint.h>
#include "softfloat.h"
extern uint_fast8_t slowfloat_roundingMode;
extern uint_fast8_t slowfloat_detectTininess;
extern uint_fast8_t slowfloat_exceptionFlags;
#ifdef EXTFLOAT80
extern uint_fast8_t slow_extF80_roundingPrecision;
#endif
#ifdef FLOAT16
float16_t slow_ui32_to_f16( uint32_t );
#endif
float32_t slow_ui32_to_f32( uint32_t );
#ifdef FLOAT64
float64_t slow_ui32_to_f64( uint32_t );
#endif
#ifdef EXTFLOAT80
void slow_ui32_to_extF80M( uint32_t, extFloat80_t * );
#endif
#ifdef FLOAT128
void slow_ui32_to_f128M( uint32_t, float128_t * );
#endif
#ifdef FLOAT16
float16_t slow_ui64_to_f16( uint64_t );
#endif
float32_t slow_ui64_to_f32( uint64_t );
#ifdef FLOAT64
float64_t slow_ui64_to_f64( uint64_t );
#endif
#ifdef EXTFLOAT80
void slow_ui64_to_extF80M( uint64_t, extFloat80_t * );
#endif
#ifdef FLOAT128
void slow_ui64_to_f128M( uint64_t, float128_t * );
#endif
#ifdef FLOAT16
float16_t slow_i32_to_f16( int32_t );
#endif
float32_t slow_i32_to_f32( int32_t );
#ifdef FLOAT64
float64_t slow_i32_to_f64( int32_t );
#endif
#ifdef EXTFLOAT80
void slow_i32_to_extF80M( int32_t, extFloat80_t * );
#endif
#ifdef FLOAT128
void slow_i32_to_f128M( int32_t, float128_t * );
#endif
#ifdef FLOAT16
float16_t slow_i64_to_f16( int64_t );
#endif
float32_t slow_i64_to_f32( int64_t );
#ifdef FLOAT64
float64_t slow_i64_to_f64( int64_t );
#endif
#ifdef EXTFLOAT80
void slow_i64_to_extF80M( int64_t, extFloat80_t * );
#endif
#ifdef FLOAT128
void slow_i64_to_f128M( int64_t, float128_t * );
#endif
#ifdef FLOAT16
uint_fast32_t slow_f16_to_ui32( float16_t, uint_fast8_t, bool );
uint_fast64_t slow_f16_to_ui64( float16_t, uint_fast8_t, bool );
int_fast32_t slow_f16_to_i32( float16_t, uint_fast8_t, bool );
int_fast64_t slow_f16_to_i64( float16_t, uint_fast8_t, bool );
uint_fast32_t slow_f16_to_ui32_r_minMag( float16_t, bool );
uint_fast64_t slow_f16_to_ui64_r_minMag( float16_t, bool );
int_fast32_t slow_f16_to_i32_r_minMag( float16_t, bool );
int_fast64_t slow_f16_to_i64_r_minMag( float16_t, bool );
float32_t slow_f16_to_f32( float16_t );
#ifdef FLOAT64
float64_t slow_f16_to_f64( float16_t );
#endif
#ifdef EXTFLOAT80
void slow_f16_to_extF80M( float16_t, extFloat80_t * );
#endif
#ifdef FLOAT128
void slow_f16_to_f128M( float16_t, float128_t * );
#endif
float16_t slow_f16_roundToInt( float16_t, uint_fast8_t, bool );
float16_t slow_f16_add( float16_t, float16_t );
float16_t slow_f16_sub( float16_t, float16_t );
float16_t slow_f16_mul( float16_t, float16_t );
float16_t slow_f16_mulAdd( float16_t, float16_t, float16_t );
float16_t slow_f16_div( float16_t, float16_t );
float16_t slow_f16_rem( float16_t, float16_t );
float16_t slow_f16_sqrt( float16_t );
bool slow_f16_eq( float16_t, float16_t );
bool slow_f16_le( float16_t, float16_t );
bool slow_f16_lt( float16_t, float16_t );
bool slow_f16_eq_signaling( float16_t, float16_t );
bool slow_f16_le_quiet( float16_t, float16_t );
bool slow_f16_lt_quiet( float16_t, float16_t );
#endif
uint_fast32_t slow_f32_to_ui32( float32_t, uint_fast8_t, bool );
uint_fast64_t slow_f32_to_ui64( float32_t, uint_fast8_t, bool );
int_fast32_t slow_f32_to_i32( float32_t, uint_fast8_t, bool );
int_fast64_t slow_f32_to_i64( float32_t, uint_fast8_t, bool );
uint_fast32_t slow_f32_to_ui32_r_minMag( float32_t, bool );
uint_fast64_t slow_f32_to_ui64_r_minMag( float32_t, bool );
int_fast32_t slow_f32_to_i32_r_minMag( float32_t, bool );
int_fast64_t slow_f32_to_i64_r_minMag( float32_t, bool );
#ifdef FLOAT16
float16_t slow_f32_to_f16( float32_t );
#endif
#ifdef FLOAT64
float64_t slow_f32_to_f64( float32_t );
#endif
#ifdef EXTFLOAT80
void slow_f32_to_extF80M( float32_t, extFloat80_t * );
#endif
#ifdef FLOAT128
void slow_f32_to_f128M( float32_t, float128_t * );
#endif
float32_t slow_f32_roundToInt( float32_t, uint_fast8_t, bool );
float32_t slow_f32_add( float32_t, float32_t );
float32_t slow_f32_sub( float32_t, float32_t );
float32_t slow_f32_mul( float32_t, float32_t );
float32_t slow_f32_mulAdd( float32_t, float32_t, float32_t );
float32_t slow_f32_div( float32_t, float32_t );
float32_t slow_f32_rem( float32_t, float32_t );
float32_t slow_f32_sqrt( float32_t );
bool slow_f32_eq( float32_t, float32_t );
bool slow_f32_le( float32_t, float32_t );
bool slow_f32_lt( float32_t, float32_t );
bool slow_f32_eq_signaling( float32_t, float32_t );
bool slow_f32_le_quiet( float32_t, float32_t );
bool slow_f32_lt_quiet( float32_t, float32_t );
#ifdef FLOAT64
uint_fast32_t slow_f64_to_ui32( float64_t, uint_fast8_t, bool );
uint_fast64_t slow_f64_to_ui64( float64_t, uint_fast8_t, bool );
int_fast32_t slow_f64_to_i32( float64_t, uint_fast8_t, bool );
int_fast64_t slow_f64_to_i64( float64_t, uint_fast8_t, bool );
uint_fast32_t slow_f64_to_ui32_r_minMag( float64_t, bool );
uint_fast64_t slow_f64_to_ui64_r_minMag( float64_t, bool );
int_fast32_t slow_f64_to_i32_r_minMag( float64_t, bool );
int_fast64_t slow_f64_to_i64_r_minMag( float64_t, bool );
#ifdef FLOAT16
float16_t slow_f64_to_f16( float64_t );
#endif
float32_t slow_f64_to_f32( float64_t );
#ifdef EXTFLOAT80
void slow_f64_to_extF80M( float64_t, extFloat80_t * );
#endif
#ifdef FLOAT128
void slow_f64_to_f128M( float64_t, float128_t * );
#endif
float64_t slow_f64_roundToInt( float64_t, uint_fast8_t, bool );
float64_t slow_f64_add( float64_t, float64_t );
float64_t slow_f64_sub( float64_t, float64_t );
float64_t slow_f64_mul( float64_t, float64_t );
float64_t slow_f64_mulAdd( float64_t, float64_t, float64_t );
float64_t slow_f64_div( float64_t, float64_t );
float64_t slow_f64_rem( float64_t, float64_t );
float64_t slow_f64_sqrt( float64_t );
bool slow_f64_eq( float64_t, float64_t );
bool slow_f64_le( float64_t, float64_t );
bool slow_f64_lt( float64_t, float64_t );
bool slow_f64_eq_signaling( float64_t, float64_t );
bool slow_f64_le_quiet( float64_t, float64_t );
bool slow_f64_lt_quiet( float64_t, float64_t );
#endif
#ifdef EXTFLOAT80
uint_fast32_t slow_extF80M_to_ui32( const extFloat80_t *, uint_fast8_t, bool );
uint_fast64_t slow_extF80M_to_ui64( const extFloat80_t *, uint_fast8_t, bool );
int_fast32_t slow_extF80M_to_i32( const extFloat80_t *, uint_fast8_t, bool );
int_fast64_t slow_extF80M_to_i64( const extFloat80_t *, uint_fast8_t, bool );
uint_fast32_t slow_extF80M_to_ui32_r_minMag( const extFloat80_t *, bool );
uint_fast64_t slow_extF80M_to_ui64_r_minMag( const extFloat80_t *, bool );
int_fast32_t slow_extF80M_to_i32_r_minMag( const extFloat80_t *, bool );
int_fast64_t slow_extF80M_to_i64_r_minMag( const extFloat80_t *, bool );
#ifdef FLOAT16
float16_t slow_extF80M_to_f16( const extFloat80_t * );
#endif
float32_t slow_extF80M_to_f32( const extFloat80_t * );
#ifdef FLOAT64
float64_t slow_extF80M_to_f64( const extFloat80_t * );
#endif
#ifdef FLOAT128
void slow_extF80M_to_f128M( const extFloat80_t *, float128_t * );
#endif
void
slow_extF80M_roundToInt(
const extFloat80_t *, uint_fast8_t, bool, extFloat80_t * );
void
slow_extF80M_add(
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
void
slow_extF80M_sub(
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
void
slow_extF80M_mul(
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
void
slow_extF80M_mulAdd(
const extFloat80_t *,
const extFloat80_t *,
const extFloat80_t *,
extFloat80_t *
);
void
slow_extF80M_div(
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
void
slow_extF80M_rem(
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
void slow_extF80M_sqrt( const extFloat80_t *, extFloat80_t * );
bool slow_extF80M_eq( const extFloat80_t *, const extFloat80_t * );
bool slow_extF80M_le( const extFloat80_t *, const extFloat80_t * );
bool slow_extF80M_lt( const extFloat80_t *, const extFloat80_t * );
bool slow_extF80M_eq_signaling( const extFloat80_t *, const extFloat80_t * );
bool slow_extF80M_le_quiet( const extFloat80_t *, const extFloat80_t * );
bool slow_extF80M_lt_quiet( const extFloat80_t *, const extFloat80_t * );
#endif
#ifdef FLOAT128
uint_fast32_t slow_f128M_to_ui32( const float128_t *, uint_fast8_t, bool );
uint_fast64_t slow_f128M_to_ui64( const float128_t *, uint_fast8_t, bool );
int_fast32_t slow_f128M_to_i32( const float128_t *, uint_fast8_t, bool );
int_fast64_t slow_f128M_to_i64( const float128_t *, uint_fast8_t, bool );
uint_fast32_t slow_f128M_to_ui32_r_minMag( const float128_t *, bool );
uint_fast64_t slow_f128M_to_ui64_r_minMag( const float128_t *, bool );
int_fast32_t slow_f128M_to_i32_r_minMag( const float128_t *, bool );
int_fast64_t slow_f128M_to_i64_r_minMag( const float128_t *, bool );
#ifdef FLOAT16
float16_t slow_f128M_to_f16( const float128_t * );
#endif
float32_t slow_f128M_to_f32( const float128_t * );
#ifdef FLOAT64
float64_t slow_f128M_to_f64( const float128_t * );
#endif
#ifdef EXTFLOAT80
void slow_f128M_to_extF80M( const float128_t *, extFloat80_t * );
#endif
void
slow_f128M_roundToInt( const float128_t *, uint_fast8_t, bool, float128_t * );
void slow_f128M_add( const float128_t *, const float128_t *, float128_t * );
void slow_f128M_sub( const float128_t *, const float128_t *, float128_t * );
void slow_f128M_mul( const float128_t *, const float128_t *, float128_t * );
void
slow_f128M_mulAdd(
const float128_t *, const float128_t *, const float128_t *, float128_t *
);
void slow_f128M_div( const float128_t *, const float128_t *, float128_t * );
void slow_f128M_rem( const float128_t *, const float128_t *, float128_t * );
void slow_f128M_sqrt( const float128_t *, float128_t * );
bool slow_f128M_eq( const float128_t *, const float128_t * );
bool slow_f128M_le( const float128_t *, const float128_t * );
bool slow_f128M_lt( const float128_t *, const float128_t * );
bool slow_f128M_eq_signaling( const float128_t *, const float128_t * );
bool slow_f128M_le_quiet( const float128_t *, const float128_t * );
bool slow_f128M_lt_quiet( const float128_t *, const float128_t * );
#endif
|
