1 | /* Declarations for SVID math error handling compatibility. |
2 | Copyright (C) 1991-2023 Free Software Foundation, Inc. |
3 | This file is part of the GNU C Library. |
4 | |
5 | The GNU C Library is free software; you can redistribute it and/or |
6 | modify it under the terms of the GNU Lesser General Public |
7 | License as published by the Free Software Foundation; either |
8 | version 2.1 of the License, or (at your option) any later version. |
9 | |
10 | The GNU C Library is distributed in the hope that it will be useful, |
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
13 | Lesser General Public License for more details. |
14 | |
15 | You should have received a copy of the GNU Lesser General Public |
16 | License along with the GNU C Library; if not, see |
17 | <https://www.gnu.org/licenses/>. */ |
18 | |
19 | #ifndef _MATH_SVID_COMPAT_H |
20 | #define _MATH_SVID_COMPAT_H 1 |
21 | |
22 | /* Support for various different standard error handling behaviors. */ |
23 | typedef enum |
24 | { |
25 | _IEEE_ = -1, /* According to IEEE 754/IEEE 854. */ |
26 | _SVID_, /* According to System V, release 4. */ |
27 | _XOPEN_, /* Nowadays also Unix98. */ |
28 | _POSIX_, |
29 | _ISOC_ /* Actually this is ISO C99. */ |
30 | } _LIB_VERSION_TYPE; |
31 | |
32 | /* This variable can be changed at run-time to any of the values above to |
33 | affect floating point error handling behavior (it may also be necessary |
34 | to change the hardware FPU exception settings). */ |
35 | extern _LIB_VERSION_TYPE _LIB_VERSION; |
36 | |
37 | /* In SVID error handling, `matherr' is called with this description |
38 | of the exceptional condition. */ |
39 | struct exception |
40 | { |
41 | int type; |
42 | char *name; |
43 | double arg1; |
44 | double arg2; |
45 | double retval; |
46 | }; |
47 | |
48 | extern int matherr (struct exception *__exc); |
49 | extern int __matherr (struct exception *__exc); |
50 | |
51 | #define X_TLOSS 1.41484755040568800000e+16 |
52 | #define AS_FLOAT_CONSTANT_1(x) x##f |
53 | #define AS_FLOAT_CONSTANT(x) AS_FLOAT_CONSTANT_1(x) |
54 | |
55 | /* Types of exceptions in the `type' field. */ |
56 | #define DOMAIN 1 |
57 | #define SING 2 |
58 | #define OVERFLOW 3 |
59 | #define UNDERFLOW 4 |
60 | #define TLOSS 5 |
61 | #define PLOSS 6 |
62 | |
63 | /* SVID mode specifies returning this large value instead of infinity. */ |
64 | #define HUGE 3.40282347e+38F |
65 | |
66 | /* The above definitions may be used in testcases. The following code |
67 | is only used in the implementation. */ |
68 | |
69 | #ifdef _LIBC |
70 | /* fdlibm kernel function */ |
71 | extern double __kernel_standard (double, double, int); |
72 | extern float __kernel_standard_f (float, float, int); |
73 | extern long double __kernel_standard_l (long double, long double, int); |
74 | |
75 | # include <shlib-compat.h> |
76 | # define LIBM_SVID_COMPAT SHLIB_COMPAT (libm, GLIBC_2_0, GLIBC_2_27) |
77 | # if LIBM_SVID_COMPAT |
78 | compat_symbol_reference (libm, matherr, matherr, GLIBC_2_0); |
79 | compat_symbol_reference (libm, _LIB_VERSION, _LIB_VERSION, GLIBC_2_0); |
80 | # else |
81 | /* Except when building compat code, optimize out references to |
82 | _LIB_VERSION and matherr. */ |
83 | # define _LIB_VERSION _POSIX_ |
84 | # define matherr(EXC) ((void) (EXC), 0) |
85 | # endif |
86 | #endif |
87 | |
88 | #endif /* math-svid-compat.h. */ |
89 | |